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Postal 
Advice 
from 
Germany 


Jochen Merz writes from Ger- 
many: 


New 
QView 


OQView, makers of Minerva, are 
going into production on anew 
piece of hardware which in- 
cludes a real-time clock and 240 
bytes of ram, with battery 
backup. Called the Minerva 
RTC, the features which the add- 
on automatically recovers from 
ram at reset include quick start | 
to preferred Mode, clock re- 
stored, network station number 
set,some Minervaenhancement 
optionally disabled, roms op- 
tionally soft-unplugged and 
one-line boot executed. 

Users of rom-based extensions 
will be able to unplug them in- 
dividually in software, so that 
programs that clash with exten- 
sions can be run without 
dismantling the hardware. Up 
to 128 characters of startup com- 
(goods and post/packing). mand may be stored in the ram 
There should be no extra bank ~enough to enable SuperToolkit 
charges, no expensive trans- I. and run a real boot file from a 
fers loss in saci rates. Essex worksho fe networked hard disk. These fea- 
Eurocheques may be drawn tures can be set up via a 
in DM or inthe currency of the ul | ate Superbasic configuration pro- 
country in question, also atno 4] gram. 
extra cost. 

“Money transfers between 
post offices of different coun- 
tries is also cheap, as well as 
postal money orders. All these 
ways of payment are cheap 
for sender and receiver. Butas 
soon as one German bank gets 
into the chain of money 
transfer, everything becomes 
very expensive! 

“Apart from this good news, 
there is some bad news. The 
German Post Office (already 
one of the most expensive in 
the world) has raised its postal 
rates again, so that from 1st 
July all packages up to 2kg 
costs DM 12, plus registration, 
a considerable rise. My pre- 
vious average post and 
packing cost of £2.10 has had 
to be raised to £4. Sorry.” 

Jochen Merz is at Im Stillen 
Winkel 12, 4100 Duisburg 11, 
West Germany. 


Cowo and QL way 
offer a supercomputer 


Cowo Electronics of Switzer- hard disk. A limited edition of 
land, creators of QTop, and 50 machines worldwide is cur- 
QLympicComputerSystemsof rently planned at a projected 
Germany are looking into the price under £900 for the basic 
possibility of compiling a ‘Su- model. 

per-QL’ -asubject much under Cowo and QLympic are asking 
discussion at present—toorder, that anybody who would be re- 
using the original QL board, ‘the ally interested insucha package 
brilliant Gold Card by Miracle should write to themso that they 
Systems’, Lightning Special Edi- can gauge how many people 
tion on rom, a 1.44MB 3.5 inch would buy the machine before 
disk driveandamouseportina they embark on the project, 
modern tower housing with a which will only go ahead if 
102-key MF-2 compatible key- enough interested people come 
board. As planned the package forward. Write to: 

would includetheQTop2.0user CowoElectronics,’SuperQL’, 
front and using the QJump ex-  Munsterstrasse 4, 6210 Sursee, 
tended environment. Possible Switzerland or QLympic Com- 
options wouldincludeasecond puter Systems, ‘Super QL’, 
3.5inch floppy drive,a5.25inch Quellenweg 18, 4220 
floppy drive, and /or a 40MB Dinslaken, West Germany. 


“Many QL users, especially 
from Great Britain, often ask 
about ordering goods from 
Germany. It is much easier 
than they expect, and I thinkit 
applies to other European 
countries as well. The prices 
in my own ads do not contain 
any taxed (no German MwsT., 
no UK VAT). The VAT will be 
charged by the British customs 
and collected by post. 

“Payment is cheap as well: 
just send an ordinary bank- 
order cheque in pounds 
| sterling, for the whole sum 


Other peripherals can be at- 
tached to Minerva RTC, which 
costs £65, with a discount on the 
full price only of £5, to Quanta 
members. Orders and enquiries 
to OView, 29 Carnaby Close, 
Godman-chester, Cambs PE18 
8EE. Tel: 0480 412884. 


The new date for the Essex 8pm. The program is not deter- 
Quanta Workshop, cancelled mined yet but the venue has 
earlier in the year due to the two rooms so they hope to be 
untimely deathoforganiserBob able to hold talks in one room. 
Gingell, is Sunday 25th August Further information from Ron 
(on the Bank Holiday weekend) Dunnett at 38 Brunwin Road, 
atthe Rayne Village Hall, Rayne, Rayne, Essex CM7 5BU. Tel. 
Braintree, Essex from 10am to 0376 47852 


Progs price cuts Apologies 


© 
The Van Auwerasat Progs, Bel- and expiry date) are accepted to Dig ital 
gium, are pleased to announce without transfer charges. Ster- 
a series of price-cuts in their ling cheques must iat a£10 P rec q Ss I 0 n 
established software. Prices charge for transfer costs. 

from 1 June are: The Painter BeF _ Progs are expecting to publish 
1500 (£25), The Clipart BeF 600 a new range of software based 
(£10), The Painter XM BeF 1200 on vector graphics in October of 
(£20), Qractal BeF 1200 (£20), this year. 

DataDesign BeF 3000 (£50). 

Eurocheques in Belgian Francs Orders and enquiries to Progs 
transferred to theiraccountno. (Vander Auwera), Haaclistraat 
000-1612119-76,and VISA card 92, B-3020 Veltem, Belgium. 
payment (specify card number Tel: (Belgium) (016) 48 69 52. 


As a result of our enquiries, we 
accept that articles by Simon 
Goodwin which appeared in the 
December 1990 and June 1991 
issues of QL World contained 
incorrect and misleading matter, 
potentially damaging to the good 
name and excellent technical 
reputation of Digital Precision Ltd. 
We apologise unreservedly. 
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‘PEN HANNEL 


Open Channel is where you have the 
opportunity to voice your opinions in 
Sinclair QL World. Whether you want to ask 
for help with a technical problem, provide 


Underline 


Beryl Crawley's letter in QL 
World May 1991, brings back 
thememory of exactly thesame 
problem which beset me way 
back in 1984/5 using an AH 
machine. I was then living in 
Botswana and had no easy ac- 
cess to outside help. 

The key is in her first phrase 
‘when using some microdrives'. 
I emphasise the 'some’. I dis- 
covered that I could only 
eliminate the problem by for- 
matting the microdrive(s) 
which had apparently become 
corrupted in some way. I then 
used my backup copies to put 
the data back. As an additional 
precaution I also formatted my 
Quill program cartridge and 


re-recorded it from the master. 
This meant, of course, that I 
had to reset the Install_bas 
program to my requirements. 
After that I always kept atleast 

two working copies of Quill. 
Although I continued to use 
only microdrives until very 
recently , the underlining phe- 
nomenon never occurred 

again. 

Christopher J Green 
Richmond-on-Thames 
Surrey 


Trump 


I had trouble with my 986K 
Trump Card, and sent the 
board to Miracle Systems for 
repair on 27th April. I received 
the board back on 15th May, 


somebody with the answer, or just sound off 


about someth 


ing which bothers you, write 


to: Open Channel, Sinclair OL World, 


116/120 Gosw: 


ell Road, London EC1V 7QD. 


1 dev$='FLP1i_' 
2 REMark CONQUERER, 
MS-DOS/PC emulator for 


the Sinc 
3 REMark 
GQ: 
S REMark S 
6.13 
TK2_EXT 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 
ALTKEY 


lair QL or Thor 


ystem BOOT program 


CHR$ (232) , CHR$ (233) 
CHR$ (236) , CHR$ (237) 
CHR$(240) ,CHR$(241) 
CHR$( 244) , CHR$(245) 
CHR$ (248) , CHR$(166) 
CHR$ (234) , CHR$(235) 
CHR$ (238) , CHR$ (239) 
CHR$ (242) , CHR$(243) 
CHR$ (246) , CHR$(247) 
CHR$(250) , CHR$(251) 


eossaueversls 


In Europe, Cowo and QLympic are sizing 
up the possibility of assembling tower- 
cased QL systems using the advanced new 
components which have recently become 
available, thanks to the efforts of some of 
the longest-serving QL developers. It will be 
interesting to see what the reaction is to an 
advanced QL system with a projected cost 
of somewhat under £900 — competitive with 
PC/AT-type systems. It may be that many 
large-scale QL users feel that they are 
already in possession of some of the 
components offered and would rather 
assemble their own systems, but it is a bold 
and courageous step nonetheless. 

It is little appeciated that farms were often 
among the first businesses to adopt home 
micros for accounting. No doubt this is 
because farmers, like scientists, often take a 
glum view of the reliability of 
wetware. 
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ALTKEY 


CHR$(47) ,CHR$(176) 


100 EXEC_W dev$&'CONQUEROR' 


and the repair was free of 
charge. They havealso updated 
the disk drivers and ToolKit 2. 
Very good service. 

I can also recommended 
CGH Services and Qlympic 
Software. They send what you 
haveordered inacoupleof weeks. 

Pal Monstad 
Norweigan All Sinclair 
Association 

Norway 


I am the owner of a Thor XVI 
computer. I have a problem 
with the Xchange program es- 
pecially with the printer setups. 
When lamin Archiveand want 
to print a file greater than one 
page long from within Archive, 
the printer will printanywhere 
from 72 lines to 80 lines and 
then generates a ‘Formfeed’. I 
evenadjusted the printer driver 
to 66 lines but without success. 
I tried to enter all new data but 


the computer insists on putting 
in‘LOPORELLO in the printer 
format. 

Can someone help me to get 
my printer to behave like it did 
when it was hooked up to the 
QL? 

Another problem with the 
Thor is that it does not return 
correct tangent values. I have 
computer versions V6.41 and 
I/O processor 1.07. 

Ernest Wider 
Dover 
USA 


New capital = old capital x 
(1=rate/100) = credit: building 
societies appear to accept cred- 
its six days a week, unlike 
banks, which operate only five 
days a week in that respect. 
Has anybody a that 
will permit calculations of the 
interest earned over a number 
of years on a day to day basis, 
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as appears to be the practice? 

My attempts in programming 

such a thing have failed miser- 

ably. I need the program to 

adjust my income, ie the inter- 

est, over various periods for 
tax limiting purposes. 

REN Patterson 

Canterbury 

Kent 


It would appear that many us- 
ers of PC-style keyboards for 
the QL are not aware that F6 to 
F10 on their keyboard are 
equivalent to Shift Fl to F5ona 
standard QL keyboard, and 
thus have difficulty in map- 
ping their keyboard for use 
with programs like PC Con- 
queror. 

I use an IBM-style keyboard 
with an ABC interface and 
readers may be interested in 
my keyboard mapping. This 
was designed with Word Per- 
fect in mind, and my aim was 
to mimic the PC keyboard as 
far as possible to use an easily 
remembered alternative. I find 
it easier to use than some alter- 
native suggestions. 

On my system all the function 
keys used on their own and all 
function keys used with ALT 
work as on a PC. This latter is 
possible by using the ALTKEY 
command in Toolkit II. Con- 
trol Function and Shift Control 
Function do not work as on a 
PC. Instead Control Function 
is Control plus a numeral key, 
and Shift Function is Control 
Shift plus a numeral key. 

For some other commands I 
use memonics: 


Printscreen = Control Shift P 
Insert = Control Shift I 
Help screen = Control Shift H 


In addition, line 30 of the boot 
program allows me to use the 
PrtSc key on my keyboard to 
print out a screen. In fact, the 
only key combination needed 
by Wordperfect that I am un- 
able to obtain is Control plus 
Enter (hard page). Has another 
reader a solution to this? 

As far as the function keys 
are concerned, my mapping 
should work with the Sandy, 
Schon and Thor keyboards. I 
am not sure however if all keys 
will work. 

Geoff Wicks 
Amsterdam 
Netherlands 


As a result of a number of po- 
tentially fatal crashes due to 
overheating of the (uprated) 
7805 voltage regulator, I have 
today replaced it with Care 
Electronics' QPower switched 
mode regulator board. It 
worked first time, and has so 
far performed without a hitch. 
The QL itself is running much 
cooler and even the power 
supply unit seems happier (it 
used to buzz to itself on a bad 
day). 
Alex Munden 
London N16 


Having made respectful oppo- 
nents, rather than friends, with 
a Tandy DMP 110 and an 
Amstrad flat bed printer, I 
might be able to offer reassur- 
ance rather than solutions to 
those suffering interface prob- 
lems. Somewhere in my files 
are the following: 


1) Tandy DMP 110 screen 
dump which background- 
tasks on a hotkey, and allows 
the user to select part of the 
screen, copy to file, stream file 
to printer giving sideways 
dump with no lost pixels on 
A4. The hotkey/screen select 
is compiled Superbasic, the 
dump is assembler. 


2) IBM font and filter a) QL font 
for character values in Ascii 
range, IBM font in Alt-Ascii 
range. (b) Compiled C filter 
interrogates ramdisk for a file 
with a funny name. When the 
file is found it is copied to the 
printer, the Alt-Ascii (IBM 
graphics) characters are trans- 
lated to the corresponding 
codes. The file is then deleted. 
To use it, print a document, 
save it to the ram file with the 
funny name, and remember to 
close the file. This produces 
pretty documents and delight- 
fully grotesque pictures. 


I could probably dig those out 
—is anybody interested? 

J F Marks 

Glasgow 


Editor's comment: please let me 
know if you are interested, and we 
will either contact J F Marks or, if 
there is enough demand, offer to 
print the routines. 
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I bought a Panasonic KXP 1124 
24-pin printer by post. The 
Panasonic printer ribbon sup- 
plied did not last long, and the 
inbuilt re-inking system on the 
ribbon did not appear to make 
much difference at first, but 
improved. 

Then I had difficulty obtain- 
ing a further ribbon as most 
suppliers seem to haverun out, 
whether of Panasonic's own 
make or compatibles. One firm 
phoned to say that they had 
tried Panosonic themselves, 
who could not supply and 
were going to their agents 
overseas. I had lots of prom- 
ises. When eventually I found 
some ribbons I ordered more 
than I might otherwise have 
done. 

Inow prefer touse Text”. This 


is not an easy program to use 
after Quill, but is worth perse- 
vering with. Even the manuals 
do not reveal what it is capable 
of: I find that I can have What- 
you-see-is-what-you-get with 
all fonts that the printer is ca- 
pable of, including double- 
height-double-width. 

While I have had help, I find 
that Quill even with codes in- 
stalled so that I can switch on 
all fonts cannot compare with 
Text*’, because there is no 
wysiwyg, and printing out is 
guesswork. I have at last put 
Quill on one side. 

Of course, the printer can be 
driven from the ‘dashboard! at 
the front, but using software is 
easier. Other facilities include 
being able to park a continu- 
ous roll, and put single sheets 
into the machine from the front. 

Stanley Hurwitz 
Cirencester 
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o amount of written claims about 
speed can give the full impres- 

sion that alive demonstration can 

give, and many computer users 
will be — with good reason — skeptical 
about speed claims in general. Demon- 
strations can be ‘rigged’ to give an unduly 
rosy picture of what a particular item of 
software or hardware will do for the would- 
be buyer, but some of them do let you get 
a (rough) feel for whether or not the product 
in question is worth buying. One software 
item which is a‘must' for QL programmers 
is a compiler; a hardware item which may 
well become a must for both program- 
mers and ordinary users is the Miracle 
Gold Card. Having recently spent a few 
hours looking at a screen connected to 
one of the early, pre-production 16 MHz 
Gold Cards, | now have a fair idea of what 
one will feel like in use. Without any doubt, 
it is very impressive. First, some bench- 
mark figures. 

The test program (see first box) was a 
simple 16-line routine, with an inner and 
an outer loop, and a string start-length. 
Not really the kind of thing the average 
word-processing program does all the 
time, but a reasonably valid test of cpu 
speed. The SuperBasic routine was also 
compiled with Turbo, to show what that 
can do. The REMark has to be removed 
fromin front of IMPLICIT% (in the first line) 
before the routine is compiled. The rea- 
son for the variable start-length string is to 
show how SB operation gets slower with 
string length; there is little change in speed 
with string length when the routine has 
been compiled. Six sets of figures are 
given in Figure One: timings using the SB 
routine, on a JM QL with Trump Card 1 
(the original, slower type), a JM QL with 
Trump Card 2 (current, faster type), anda 
JM QL with 16 MHz Gold Card, and tim- 
ings using the Turboed version of the SB 
routine, on the same combinations of QLs 
and interfaces. 

The runs were made with ‘clean ma- 
chines' — that is, nothing but the test 
routines loaded. The parameters used 
were not the same with SB as with the 
compiled version in all cases, simply be- 
cause timings with some equal sets of 
parameters would have been inordinately 
long with SB and too short to measure 
with the compiled version. The difference 
is that great. 

Anyone wanting to run the SB form of 
this routine with large values for the pa- 
rameters should consider adding a few 
lines, to get the QL to print something to 


Bryan Davis considers 
the huge advances 
made in recent up- 
grades to the QL. 


the screen at intervals, and prove that it 
has not died during a test! To save you the 
trouble working it out, 86,782 secondsisa 
little over 24 hours — certainly the longest 
my QL has run on one job. 

Looking at the figures in the second box, 
itis clear that Miracle’s advertised sug- 
gestions for speed improvements with the 
Gold Card as compared to the Trump 
Card are reasonable. The improvement 
factor in these tests was about three to 
four times over the current Trump Card, 
three to five times over the older one. The 
merit of the current TC over the old one 
does not show in the shorter tests, but 
becomes evident as the tests get longer in 
duration. This is presumably because only 
the ‘low’, basic, QL memory is used when 
the parameter values are small. You can 
work percentage improvements out for 
yourself, if you think they are worth both- 
ering with. Whatever the percentages, itis 
very clear that both Turbo and the Gold 
Card are well worth having. Note that the 
effect of using Turbo is significantly greater 
with the Gold Card than with the Trump 
Card. 


Timings 


Such timings don’tgive the Quil/user any 
real idea of what to expect if he/she 
switches to Perfection, and/or the Gold 
Card. Using a JM QL with Trump Card, 
Perfection works fast on some opera- 
tions, very fast on others. What delays 
there are don’t occupy more than a sec- 
ond or so. The steadiness and respon- 
siveness of the cursor are a pleasure to 
see; it moves as fast as the keys can 
commandit, and stays virtually unwavering 
in shape and intensity. For those who 
have seen early versions of Perfection 
demonstrated, be assured that the latest 
version (as of early June) is appreciably 
faster and smoother overall and remark- 
ably steady in behaviour for a ‘young’ 
program. 

On the JS and JM with Gold Card, the 
speed is quite staggering. Having been 


used to using WordPerfect 5 on a rea- 
sonably brisk PC/AT, and finding the speed 
of the combination generally acceptable 
in most respects, | already knew that 
Perfection with a JM and Trump Card was 
a noticeably faster combination in some 
ways; on a JS with Gold Card, Perfection 
makes WordPerfect and the AT look dis- 
tinctly sluggish. I’d venture to guess that 
the same would be true of other wp pro- 
grams on the PC, and of the faster 
machines, such as those with a 386 
processor. 


Performance 


Neither the Gold Card nor Perfection 
can cover up for some basic slowness in 
QL operation, however, so don't expect 
the overall performance of the QL/Gold 
Card/Perfection combination to be supe- 
rior to every comparable combination of 
PC andwp program. Screen display speed 
is still a limiting factor, and disk input/ 
output is another. It is highly unlikely that 
even a very smart programmer will be 
able to make the loading and saving of | 
files to disk on the QL as fast as the same 
operations on a fast PC with decent hard 
disk and disk cache. 

The QL hard disk is much faster than the 
floppy drives, but it is still relatively slow. 
Even with that qualification, there is still no 
doubt that the QL can now be placed inthe 
same league as several more-modern 
computers, provided a Gold Card is fitted. 
Miracle demonstrated a go-faster board 
with a 68020 cpu some time ago, and they 
are almost certainly investigating the 
possiblity of developing further upgrades 
to use either this, the 68030, or the 68040 
cpu. All these should give appreciably 
better performance than the 68008 used 
in the current Gold Card. There now looks 
to be a real upgrade path, to encourage 
any wavering QL owners to stick with their 
favourite machine. 

The external heat sink on the 16 MHz 
Gold Card seems to get noticeably warmer 
than that on the 12 MHz version, but notto 
the extent of giving trouble on a fairly 
summer-like day. The unit referred to here 
was in use for a session lasting nearly 
twelve hours and no hardware problem 
was evident during that time. Brief use of 
a later unit did indicate there may be a 
problem with some disk drives, as this unit 
failed to recognise my Mitsubishi drives 
although it had been working properly 
with NEC ones. This did not look to be a 
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major problem to sort out, though. 

One final point on this subject, this one 
concerning using Lightning with the Gold 
Card. In case the Miracle advert doesn't 
make it clear, the best version of Lightning 
to use with the Gold Card is the disk one 
supplied with the rom Lightning SE. That 
is, itis the reverse of the situation with the 
Trump Card; with the TC, you need to use 
the rom for maximum boost to the screen 
display but, with the Gold Card fitted, pull 
the rom out and use the SE disk version 
instead. With either interface, the SE ver- 
sion works better than the standard Light- 
ning. 

TaskMaster users and buyers will be 
pleased to know that an incompatibility 
between this program and the Gold Card 
was spotted early on and should have 
been sorted out well before this article 
appears in print. The hard disk version of 
TaskMaster is not affected by the prob- 
lem. It was good to see Miracle’s state- 
ment (in their advert in the June issue of 
QL World) that they have put a lot of effort 
into checking for incompatibilities with 
other products, and will endeavour to deal 
quickly with any that come to light. Cus- 
tomers will no doubt be reassured to see 
such regard for existing QL products stated 
so publicly and clearly. 


Print quality 


Arecent article extolled the merits of the 
Hewlett-Packard DeskJet printer, but the 
printed samples did not do it full justice. 
Somewhere along the way, the print ac- 
quired a noticeable jaggedness. Another 
reader with a DeskJet has since sent me 
a letter to illustrate the printer's capability, 
and the quality is certainly comparable to 
that from my Epson GQ-5000 laser printer. 
At first glance, many people would not 
notice any difference. The laser output is 
superior, but not sufficiently so to matter 
for many purposes. 

There is a difference of maybe £100-200 
in the rock-bottom prices of inkjet and 
laser printers, in favour of the DeskJet. 
Against this, the DeskJet is apparently 
rather touchy about the type of paper 
used in it, and you do have to make sure 
the printouts are kept away from wetness, 
as the ink remains somewhat soluble in 
water. The running cost is not low, ei- 
ther; at about £13 plus VAT for an ink 
cartridge, which lasts for about 500 
sheets of paper, you are up into the 
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eeOR ROKR 


100 REMark IMPLICIT% V,W,X,Y,Z 
110 DIM A$(32000) 


120 OPEN #3,"CON_512x256a0x0":CLS #3 


130 REPeat LOOP 


140 INPUT #3,"INNER LOOP (0-32000): ":V 
150 INPUT #3,"0UTER LOOP (0-32000): ";W 
160 PRINT #3,"START LENGTH OF STRING (0-";32000-V;"): ";:INPUT #3,X 


170 START _TIME=DATE 
180 FORY=1TOW 

190 A$=FILL$("-”,X) 
200 FOR Z=1 TOV 
210 A$=A$R"*" 
220 END FOR Z 

230 END FORY 


240 PRINT #3,"TIME TAKEN: “;DATE-START_TIME;" seconds’\\ 


250 END REPeat LOOP 


same cost range as a laser. 

Dilwyn Jones Computing has sent in a 
review copy of its file-finder program, 
originally called WinFind but now known 
as The Gopher. The name change re- 
flects the fact that the program can be 
used with floppy disks or microdrive car- 
tridges as well as with hard disk, although 
its value will clearly be greatest with the 
latter. The program runs on a basic QL, is 
in Turboed SuperBasic, andcomes witha 
well-printed and comprehensive set of 
instructions. Searches can be restricted 
to particular hard disk sub-directories, and 
to the first part of files (length determined 
by auser-specified buffer), andletter case 
can be significant or not. 

Groups of files can be specified by enter- 
ing a string of characters to be looked for 
in the file name; the reverse function, 
specifying file groups that are not to be 
included in a search, is also possible. The 
include and exclude functions can be 
combined for one search. The results of 
search operations can be printedto screen 
or printer. It looks to be a well thought-out 
program; we hope to print a review of it 
before too long. On a related subject, the 
Chairman of the QL Users’ Group Quanta, 
Phil Borman, has provided a copy of a 
utility he has written to make the use of 
sub-directories simpler on the Miracle hard 
disk. Anything of this nature is welcome 
and | hope to have atest session with both 
these utilities shortly. 


Readers’ letters 


Can anyone give Bob Matthews the 
present address of Taylor-Made Sys- 
tems? This company used to do laser 
printing from Quill and fext87 files, but 
appears to have moved fairly recently. 


The last address | had is in Kingston-on- 
Thames. 

The closing-down of some supplers 
drags on for many months, and we have 
received another (undated) complaint 
about PDQL. Andrew Pratt bought a 
Trump Card with combined 5 1/4in and 3 
1/2in disk drives in early 1989, andreturned 
the drives for repair later the same year. It 
was no surprise to hear he has heard 
nothing about the unit since then. Whether 
or not legal action at this time would serve 
any purpose is debatable, but | have heard 
nothing concrete about PDQL for many 
months. Itis likely that any money available 
from that supplier has already been 
obtained through legal action by other 
suppliers and customers. Pratt would like 
to mix Korean-language characters with 
English ones, and wants to know if any 
program allows the user to design and 
instal founts. It’s doubtful if this could be 
done unless he has sufficient knowledge 
of QL operation to dig into the operating 
system a bit. Quill, ftext87 and Perfection 
all use more than one fount, and someone 
with sufficient understanding can modify 
the alternate founts used by these 
programs. Would anyone who has done 
this with Quill, say, care to offer instruc- 
tions? 

TK Computerware have advised that 
the hard disk unit supplied to Michael 
Cronsten (see comments in the June 
Trouble Shooter) was accompanied by a 
Customs Declaration (CP2/CP3). The 
reason for the £130 Cronsten had to pay 
to get the unit into Sweden was the 25% 
VAT and 3.8% duty charged on the coun- 
try, on the price of the unit (about £400). 
VAT was not charged on the UK price, and 
it therefore had to be paid in the destina- 
tion country. Buyers should bear in mind 
that VAT and Customs Duty are legal 
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Over 118 Commands:- Full Screen 


QL HARDWARE 


Single 3.5" Dise Drive & (Own PSU} wo. 
Dual 3.5" Disc Drive & (Own PSU) .. 

3,5" OS/DD Discs - 10 off... 

QL Keyboard Membrane ,,.,,...... 

Care Eprom Cartridges each ........... 

ULA CBip. ZMSSO1 sas sitivesnies nctsvovereces 


SOFTWARE 87 (State MDV or Disc) 


TEXTS? {Budget Version) 
FOUNTED 89 oo... 
FOUNTEXT 88 stein non virurtess, 
TEXT 87/FOUNTED 83'FOUNTEXT 88 ........ @94.94b 
2488 PRINTER DRIVER............ @£15.00c 
Upgrade to Text 8? V.3.00. Return oh 
MONITORS (Price including lead) 
Philips BM7502 Green Hi-Res 


HOW TO ORDER 
. By Post. Enclose your Cheque'PO made payable to CARE Electronics or use ACCESS:VISA. Allow 7 days for delivery 
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come through without these taxes being 
charged is a function of the delivery and 


that no taxes are payable. It seems typical 
that small packages pass through the sys- 
tem unchecked, whereas bulky ones (such 
as a hard disk) often get opened and 
checked. My own experiences with buying 
low-cost software from the USA is that 
taxes levied in the UK can be comparable 
with the price of the goods, because the 
shipping charges have been added to the 
price of the goods before duty is calcu- 


me goods 


indication 


ere can be 


Editor, Key Define 


Print Using. Last Line Recall, Altkey, Job Control, File 


ded Network, 
serv @E23.50d 
sretaceeee E23 500 


QL SUPERTOOL KIT Il by Tony Tebby QPAC II by Tony Tebby 
Handling, Default Directories, Exteni 

16k Eprom Cartridge Version ..... 

Configurable Version on Microdrive 


sii @E£99,.64b 
suneeaeere MEAS 1A 
sees @ESS,64b 


MIRACLE SYSTEMS PRODUCTS 
OK Disc Interface (Ine Tool Kit II} -... 
QL Centronics Printer Interface ... 
QL Expanderam 512K Thrucard ..... 


@£105.75a 
@£176.25a 
ove @L940c 
.« @E11.75d 

-. @E6,11¢ 


ase BETS SBR 


@£45.98d 
-@£15,00c 
.@225.00¢ 


id copy together with 


mnennn 6 LOR OAS 


JMQL+TrumpCard1 JMQL+TrumpCard2 JMQL+16MHzGoldCard 
Basic: Compiled: Basic: Compiled: Basic: Compiled: 
Iterations: inner loop 2, outer loop 100. Start length 0: 
119 0 120 - 30 - 
Iterations: inner loop 2, outer loop 100. Start length 10,000: 
191 7 200 - 50 - 
Iterations: inner loop 2, outer loop 100. Start length 20,000: 
256 14 251 - 72 - 
Iterations: inner loop 20, outer loop 100, Start length 0: 
883 1 - - - - 
Iterations: inner loop 2,000, outer loop 100. Start length 0: 
86,782 32 - - - . 
{terations: inner loop 20,000, outer loop 100. Start length 0: 
- 317 - 59 


243 - 


Iterations: inner loop 20,000, outer loop 100. Start length 10,00 


247 : 60 


a reduction in the tax levied on an import, 
ifthe item concerned is accompanied by an 
EUR1 or Certificate of Origin. TK point 
out that, in Cronsten's case requesting this 
would have saved him only 0.8% on the 
total of invoiced cost plus VAT, however. 
Note that you, the purchaser, may need to 
request the EUR1 or Certificate of Origin — 
the Post Office does not require the sup- 
plier to provide them when despatching 
goods (via the Datapost service) from the 
UK. 

The above comments apply to Sweden, 
but no doubt similar import regulations 
pertain in other countries. As a purchaser, 
itis in your own interest to check what your 


CARE ELECTRONICS 


QPOWER REGULATOR 


MAKES YOUR OL TRULY MULTI - TASKING 
QPAC II Main menu windows adjust automatically to size 
Files, directory, view, print, delete, backup, jobs, pick, 
Fijob, sort, channels, things exec, wake, buttons, Hotkey, 
Hotjobs. Fully multitasking, allows many programs to run 
at once. Requires min of 256k expanded memory ....... 

Lvs Shisha GasraTch starmivvarnion @EAT GSO 
Upgrade QRAM to QPAC II return master .....@29.61b 

PLEASE SEND SAE FOR 
A COPY OF THE QPAC II 
REVIEW 


TONY TEBBY SOFTWARE (QJUMP) 


QLFP (Micro’P disk interface upgrade) ........@£15.51d 
QTYP Type/Spell Checker oo... .@£30.55d 
QPAC 1-Desk top accessories, calander, alarm, calcula- 
tar, typewriter. digital clock sysmon ............. @£22.56d 


ZITASOFT SOFTWARE by Steve Jones 


LOCKSMITHE copies M/DRIVE - M/DRIVE @£14,10c 
4MATTER + LOCKSMITHE copies M'DRIVE - DISC . 

SIDEWINDER - High resolution printer driver prints full 
screens or parts of screens from postage stamp size to 
large banners. Prints sideways, invert, scale, mirror, text 
WBSEMION ssscciaiscrerseaeniiarwnteneiaveccters --- @£20.21¢ 
SIDEWINDER PLUS - {for expanded QL's} includes all 
the teatures of above. PLUS multiple label printing, desk- 
top publishing files and printer driver for 24" pin plusprinters 
LC10 and Jx86 colour pnnters. {Please state 3.5" disc or 
MD}... ii Yat papodestainneies GPEZS. SOE 
Upgrade to Sidewinder Plus .......00.00000...... @£8.46e 


TROUB 


tax liabilities are likely to be on expensive 
purchases. 

Readers should be aware that complaints 
reported here are as stated by the readers 
concerned. There are at least two aspects 
to any story, and we do not automatically 
assume that everything in readers’ letters 
is 100% correct, or that all relevant facts 
have been considered. What responses 
are received from suppliers, complaints 
often look to have been unjustified. It is an 
unfortunate function of the communication 
chain involved that subsequent comments 
upon a complaint may not be printed for 
several months. 

TK were concerned by the original printed 
note about Michael Cronsten's complaint 
about having to pay £130 duty; they felt 
that the implication was that it was their 
fault he had to pay such a high figure. This 
was not what was intended, or said, in the 
original note, but — in case any reader 
misread the note — let me repeat that the 
transaction concerned (supply of a re- 
placement Miracle hard disk unit) was im- 
plemented correctly and the tax charges 
made were correct (according to the infor- 
mation supplied to me). 

TK canbe relied upon to respond promptly 
when a complaint is brought to their atten- 
tion. The same cannot be said about 
Keyboard Products, from whom no re- 
sponse has been received about several 
complaints, dating back to last year; all 
complaints concerned the ‘PS/2' keyboard. 


Switch mode power supply, QL runs cool, 
stops, lock ups (due to voltage drop). Helps 
filter noise out. Simple to fit (no soldering} 
£25.85c 


MULTI COLOURED PRINTER 
RIBBONS 


Gold, Silver, Magenta, Orange, Purple, Brown, Green, 
Blue and Red 

Citizen 120D/Switt ..., igpduad ti reteputentaderg nie 
Gannon 1080A1156A oe 
Epson FX80/LO400;LQB00 
Epson FX100/LQ1000 ., 27.996 
Panasonic KXP 1080 .... Hite ROO 
StarLC10, siigswra ruseninetaaneatnatenciuaddenteen namie bea ee 


£7,996 
.£9,87¢ 
-£5.17¢ 


READY MADE LEADS 


RBG GL TC PHONG arcs cduucrsdacmendocdnotedel 1S 
RGB'826 PIN seiccc sages acoso EG 
RGB 8-7 PIN HITACHI «W000... eccrine EF B26 
RGB 8-7 PIN FERGUSON pees a de 
RGB 8 PIN TO SCART ..... . as £1 FG 
BWAY PCC TO 25WAY 'D! ooo. RE OFG 


24 Hour Order Line 0923 894064 
OPEN 


Gam-5pm Mon-Thu 
Sam-4om Fri 


CARE ELECTRONICS 


DEPT QL, 15 HOLLAND GDNS 
GARSTON, WATFORD, 
HERTS, WD2 6JN. 

Tel: 0923-894064 
Fax: 0923-672102 


Please add carriage 
a=£11.75 b=£3,76 
c=No charge d=£2.35 
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EEE 


Three new programs from 
Dilwyn Jones Computing 
should be on the market by the 
time this is published, as well 
as an updated version of the 
popular Home Budget. 

All three programs are con- 
cerned with tidying and 
organising disk and cartridge 
collections. 

Super Disk Labeller is a pro- 
gram for printing disk labels to 
size, the labelis constructed on 
thecomputerand then printed 
to the correct format. 

Filenamescan be listed intidy 
columns across the label, in a 
choice of six layouts. The lists 
are printed in small text to fita 
reasonable number of 
filenames ontoa standard disk 
label. There is also the option 
to list file sizes, types and up- 
date dates if required. Label 
headings can be added in a 
different size if desired. 

Filename lists can be sorted 
into alphabetical order, or 
sorted by suffix or sub-direc- 
tory. The user has a choice of 
which filenames are listed. 

The label is constructed by 
inserting the disk tobe labelled 
in the disk drive, and operat- 
ing the relevant keys to initiate 
the label-making routine. 
There is a short-cut method if 
you do not want to use all the 
options. 

The program works with 9- 
and 24-pin Epson compatible 
printers, and the printer-driver 
is user-editable. Text size and 
line spacing are under user 
control. 

The program works with 9- 
and 24-pin Epson compatible 
printers, and the printer-driver 
is user-editable. Text size and 
line spacing are under user 
control. 

The program as supplied is 
configured for use with3.5inch 
disk labels as supplied by DJC 
at £2.50 per roll of 100, but can 
be altered to use 5.25 inch la- 
bels or address labels as 
needed. 

The menu-driven program 


SDL_QLW 


New disk programs from Dilwyn Jones 


780/1440 sectors 


SUPER DISK LABELLER 


VPIN_PROP_DRIVER dat 
Ypin_DRIVER dat 
24PIN_ DRIVER dat 
24PIR_PHOP_ DRIVER dat 
BACKUP bas 

BOOT 

SDL_code 

SDL PRINTER dat 
SDL_task 
UPDATES doc 
KIP1081 driver dat 


An exanple label in seall print, 


(a printer driver) 
(a printer driver] 
{a printer driver} 
(a printer driver} 


(prograa to wake a backup copy) 


(extensions used by the progran} 
(default printer driver} 

(the Super Disk Labeller progran} 
{last alnute notes abort the progran} 


{a Panasonic printer driver) 


vith explanatory 


tert added using Super Disk Labeller. 


needs at least 128 Kbytes of extra 
memory to run and comes witha 
20 page manualincluding sample 
printouts and instructions. Disk 
insert labels can also be printed. 
Super Disk Labeller costs £10.00 
on 3.5 inch or 5.25 inch disk. 
Postage and packing is extra to 
customers outside the UK (see 
below). 

Super Disk Indexer by Imre 
Dominik is an aid to cataloguing 
programs and files. The program 
asks for the number of the disk 
(or cartridge) in the drive (allo- 
cated by the user up to 999) while 
reading its directory. It then puts 
the filenames into a list. You can 
sort this list into alphabetical or- 
der if desired, and incorporate it 
into the main index. Unwanted 
filenames can be removed 
manually. Theindexcanbesorted 
by alphabet or by disk number as 
preferred. 

Filenames can be searched by 
whole or part names — exact or 
vague searching ~— and will list all 
occurrences of a filename in the 
collection. The menu-driven 
program comes with a full 
manual and requires at least384K 
of memory. It can be supplied on 
3.5 or 5.25 inch disk or 
microcassette, although disk is 
recommended. Super Disk Index 
cost £12 inclusive of UK postage. 

The Gopher by Norman Dunbar 
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is a file-finding utility: given de- 
tails of the text required, it will 
hunt through all the files on a 
disk (with a by-directory option 
for hard disks), reporting the 
names of all files containing the 
required string. Requesting a 
search by file extensions is one 
way of narrowing thesearcharea 
if preferred — DJC point out that 
there is a tremendous flexibility 
in searching, with up to eight 
paramenters for searching avail- 
able, with defaults so that the 
more complex parameters are 
only accessed if needed. Whole 
or part files can be searched. 

The Gopher will dig for files on 
floppy disk, hard disk, 
microcassette or even ramdisk. 
Available on 3.5 or 2.25 inch disk 
or microcassette, with a printed 
manual, the program costs £12 
including UK postage. 

The new update to the Home 
Budget by Joe Hattke incorporates 
changes resulting from the 
Chancellor’s Budget Statement 
this spring. The tax calculator in 
particular has had the rules 
brought into line with the new 
tax system. 

Copies supplied since April 
1991 have automatically had 
these changes incorporated, but 
earlier users can, for a limited 
period, upgrade for a fee of £3 
post inclusive by sending their 


master disk back to DJC. A few 
minor bug fixes have also been 
incorporated. Please mark your 
envelope ‘Home Budget Up- 
grade’ when returning your disk, 

Inaddition to the Home Budget 
upgrade and the File Tidy series, 
DJC have recently released three 
general interest programs, Ques- 
tion Master by C B Storey (£10) is 
a multiple-choice question and 
answer program, easy to use and 
with a sample file included. You 
canmake your own question and 
answer sets, or try General 
Knowledge Quiz Questions (£5) and 
Classical Music Quiz Questions 
(£5), also from DJC, Screen 
Economiser by G Estournet (£10) 
will turn off your monitor dis- 
play if no key is pressed for a 
period of time, to help protect the 
screen from static phosphor 
‘burn’. Single-key commands se- 
lecta time delay from one minute 
to four hours (witha default of 10 
minutes)and another ‘hitany key’ 
command willswitch the display 
back on. A function will display 
the current delay time as a re- 
minder if needed. 

Trans 24 by Ralt Rekonadt (£10) 
will convert graphics files gener- 
ated for 9-pin printer to a 24-pin 
printer driver format, if the 
graphics program concerned is 
capable of printing to a file. In 
this way packages which only 
have 9-pin drivers can use the 
superior graphics capabilities of 
24-pin printers without resorting 
to super-light printing. The pro- 
gram attempts to compensate for 
the 24-pin line spacing so that the 
output will appear as close as 
possible to the normal 9-pin size. 

These three programs will run 
on an unexpanded QL, and are 
available on 3.5 or 5.25 inch disks 
or microcassette. 

All orders and enquiries to 
Dilwyn Jones Computing, 41 
Bro Emrys, Tal-Y-Bont, Bangor, 
Gwynedd LL57 3YI, UK. Tel: 
Bangor (0248) 354023. Prices are 
inclusive of UK postage. Over- 
seas customers please add £1 for 
postage to Europe, £2.50 else- 
where. 


Lio Choma mamma 


INFORMATION 

Program: QL Library Manager 
(V2.0). 256K Memory needed. 
Supplier: Ergon Development 
c/o Davide Santachiara, Via 
Emilio de Marchi n.2, 

42100 Reggio Emilia, Italy. Tel. 
(+39) 0522 70409. 

Price: £25 (£27 on mdy) + £5 


P+p- 


Library Man- 
ager (QLM) is 
the second 
program writ- 


ten by Ergon. It is written in 
Turbocharged Basic and is the 
first program to use Ergon’'s 
own Basic System Develop- 
ment Menu system. 

The program itself looks like 
a simple idea: it enables a QL 
user to keep a ‘library’ of all his 
or her favourite Basic routines 
in the form of procedures or 
functions. This library is kept 
on disk, so that the user can 
access the routines at a later 
date for inclusion in a new Ba- 
sic program. The only problem 
with keeping a library of such 
routines is that when you later 
want to extract a procedure out 
ofanearlier program, you have 
to wait a long time for the li- 
brary to load, find where the 
procedure is stored, SAVE this 
part of the program to disk and 
then merge it with yourcurrent 
program. 


Extract 


A library manager's job is to 
extract all desired routines 
easily and quickly. Turbo users 
will already have a simple li- 
brary manager which carries 
out a similar job. The program 
supplied with Turbo is okay 
for working with the supplied 
Turbo library, but.can cause 
problems with other libraries 
because the user needs to keep 
a note of all the routines which 
are called by those he wishes to 
extract and then ensure these 
sub-routines are also extracted. 
This program is much more 
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QL LIBRARY 
MANAGER 


Rich Mellor meets a package which stores, catalogues 
and accesses SuperBasic routines. 


intelligent, works a lot more 
quickly and should be wel- 
comed by anyone who devel- 
ops Basic programs. 

The program uses the normal 
Ergon copy protection of the 
user's name and address (plus 
a secret number), and on 
loading, thisis displayed along 
with a title screen giving in- 
formation on the program. 
Pressing a key, shows you the 
main screen of QLM. This is in 
the form of a large message 
window, a small information 
window in the top right corner 
and a menu panel. 

All of the menus used by the 
program will seem familiar to 
a Qpac II user (although the 
OPTRsystem has not been used 
—this cannot be compiled with 
Turbo). Each option can be se- 


lected by using the cursor keys 
plus the space bar, or by press- 
ing a letter shown in front of 
each option. There are how- 
ever certain differences from 
normal Qpac menus: 

a) there is no scroll bar (or 
indeed any indication that not 
all of the options are actually 
displayed on screen) - as you 
attempt to movethe cursor keys 
past the top or the bottom of 
the menu, the options will scroll 
up or down; and 

b) the position of the menusis 
fixed (although this does not 
affect the program inany way). 

The menus also use certain 
function keys (CTRL and P/ 
A/S). CTRL A selects all of the 
options; CTRL S toggles all se- 
lected and unselected options; 
whilst CTRL P affects whether 


GLE Q-Librory Honoger 42,8 


B 100R Crann Maint aneent = Drannen bes H 
’ Yi POS Gm BU Ti. are 


seve chgon Geve lopment 


Sltvuse au Ready 


Input file ? (deun_? for dirac($ 
ooding fipz_TURBO_7K_OEMS .. 


oaded at 268128 
We langth: 21454 butes 


tructures setup... 


FED RO bo IN Is kn be ko Bo & fico) 


View only selected out-dir routine names 


Alter routines extraction status 


ALF les Tretragesnant _ 


D# Ip _TURBO_TK_Geiics 
en: 21454 Adder: 268128 
Frogram lines: 628 
PROCS 329 Futis 346 
ATot entries: 138 
ree mem: 69442 bytes 


Select routines by nome 
Select routines by folder 
View selected routines names 


TRANSFER CODE 
View main code 
Ulew routines 


Reset (some) data 


A file loaded and ready to sort out desired routines. 


or not the previous two keys 
apply to all functions available 
on the menu, or just those 
which are presently visible on 
screen. 

The menus are very easy to 
get used to, and provide a very 
user-friendly method of using 
the program. As a further aid 
to the user, the program at- 
tempts to select all of the most 
obvious options on entering 
that menu. This helps to cut 
down the number of key 
presses needed and also means 
that much of the program can 
be used almost without any 
intervention by the user. 


Menu 


On loading the program, the 
first menu offers the options 
Load a File, Enter Multi-File 
extraction, Define Multi-File 
menu, Add a file to Multi-File 
menu, Remove files from 
Multi-File menu, Rest Multi- 
File menu, Merge files, 
ADDNUM/RENUM a file. 

I shall look at the multi-file 
options later as these are 
amongst the most complex and 
the most difficult options to 
get to grips with. 

The other options on the 
menu allow the user to load 
one ‘library’ file from which to 
extract the necessary routines, 
merge two libraries together, 
add line numbers toa program 
or renumber a program (the 
latter however does not re- 
number any GOSUBs or 
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LIBRARY MANAGER 


GOTOs). Choosing a filename 
could not be easier, since if you 
are unsure of the filename, en- 
tering 'flp1_?' will produce a 
menu containing the directory 
of flp1_, rom which you can 
then select the name of a file 
using only the cursor keys and 
space bar. While using this 
menu, should you be uncer- 
tain as to which file you want, 
pressing F4 will copy the file 
currently under the cursor to 
screen. Once the filename has 
been chosen, the user must state 
whether or not this file has a 
_QMW file with it. 


Accessing 


The' OMW' filecontains data 
for accessing all of the different 
routines contained in a library 
file. If one is not present on the 
disk, QLM will set one up, 
which can then be later used by 
QLM. This data file ensures that 
routines can quickly be found 
and accessed by QLM, thus 
making the management of a 
library much easier. This is 
quite an intelligent routine, in 
that it can distinguish between 
names of routines in strings or 
REMarks, and will also issue a 
warning if a routine is defined 
twice. As with most of the other 
slower file access routines, the 
user can decide whether or not 
to have the output shown on 
the screen. If you answer no, 
then nothing is printed to the 
screen, ensuring that if you are 
using the Qpac multitasking 
system, you can do something 
else while the file is processed. 

Once the file has been pre- 
pared in this way, the user is 
presented with a menu which 
allows the parts of the library 
file which are to be extracted, 
to be defined in several ways: 

i) The first of these is by using 
asub-menu which contains all 
of the names of the available 
routines. You can then select 
the chosen routines using the 
cursor keys and space bar (and 
view them by F4 if you are 
unsure). 

ii) You can also choose to se- 
lect the routines by entering 
their names. If you are at all 
uncertain, you can choose to 
view the procedures / functions 
in the library, orany main code 
which surrounds them (gen- 
erally REMarks, but also pos- 
sibly main parts of a program 
which would be executed if the 
program was RUN). 


' 
Enc lute 


Incline agin cade 
Equate selected & unselected sain code 
Exclude r 


Inctude- fine wt 


REFionk peeceding included ‘cote 


Times vith ATBerator directioas 
Extract for Dititientotion purposes... 
+6:099 Unctude routines headers onto documertati 
ses0nd inspect inside soutines for documentation 


65 
extraction 


Desired routines ready for extraction from the library. 


iii) Should there be any rou- 
tines which you always tend to 
extract together (for instance a 
save routine and a load rou- 
tine), then a ‘folder’ can be cre- 
ated to hold the names of these 
routines. This folder can then 
be included on subsequent ex- 
traction processes, so that the 
user does not have to keep se- 
lecting all the names. This 
folder can be saved to disk 
along with the rest of the li- 
brary, and can even refer to 
other folders. This provides a 
tree structure for the library 
which enables cross-references 
to be implemented and thus to 
improve the usefulness of a li- 
brary. It should also be noted 
that should a folder refer to 
any names which are not 
present in the current library 
file, these names are high- 
lighted so that they may be 
later extracted from the correct 
file. 


Powerful 


I previously mentioned 
QLM'sability to access MULTI- 
FILES. This is a very powerful 
feature of the program, and 
allows the user to merge rou- 
tines which appear in several 
library files. The option is quite 
easy to use, since you only 
operate on extracting routines 
from one file at a time. How- 
ever, any routines which are 
not present in the given file, 
will then be searched for in the 
next library file and so on. This 
ensures that library files can be 
kept relatively short and 
therefore not be impeded by 
their speed of loading should 
you wish to update one of the 
routines. 

Once you have reached this 
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far, you are ready to extract the 
given routines. This (as with 
all of the other options) is not 
as simple as one may think. 
There are lots of different op- 
tions which can be used to en- 
sure that everything a user 
needs is extracted in one fell 
swoop. On entry to this menu, 
the user may well find that all 
of the necessary options have 
already been chosen for him or 
her by the program. However, 
should the user so desire, he or 
she can also choose to include 
‘main code' (ie parts of the 
program not located between 
DEFine PROCedure/FuNction 
and END DEFine), include all 
REMarks in the library file (or 
just those which appear the line 
before a selected routine); or 
include Turbo and/or 
QLiberator directives. 

Having chosen how the ex- 
traction is to be performed, the 
program will pick out the se- 
lected routines, and if not told 
otherwise, will check to see 
whether the selected routines 
make calls to other non-se- 
lected sub-routines, and will 
include these as well. It need 
only take a matter of minutes 
from deciding which routines 
to include, to having them 
loaded ready to be MERGEd 
with your new program. 


Manual 


But the package does not end 
here. Should you wish to write 
a manual for your new pro- 
gram, it is easy to forget to 
include information about 
some parts of the program. To 
this end, the Extraction menu 
also has an option to create 
documentation. It does this by 
extracting all REMark lines, 


compiler directives, names and 
parameters of routines used by 
the program. The user can 
choose how much of this infor- 
mation is extracted. The out- 
putcan then be used to createa 
user manual, or a more techni- 
cal programming manual on 
how to use various Basic rou- 
tines. 

The manual supplied with the 
programis very good, although 
it needs improving in one or 
two parts where the transla- 
tion process appears to have 
broken down (lunderstand this 
is being looked at). Thankfully 
a printed manual is supplied, 
although once the user has used 
the program once or twice, 
there should be little need to 
refer to the manual. 

Overall, the package is useful 
for SuperBasic authors, and 
should enable new Basic pro- 
grams to be created quickly, 
using experience and routines 
already created for earlier pro- 
grams. It will certainly entice 
the user to keep a library of all 
his or her own routines, rather 
than re-inventing the wheel 
every time he embarks on a 
new project. Programs like this 
are essential to anyone who 
wants tomaintaina certain 'feel’ 
to their programs, since it 
means that all routines used 
withina suite of programs will 
be the same. 


Windows 


As a little aside, there is an- 
other small program supplied 
with the package. This is a 
window definer program 
which enables the user to open 
asmany windowsas he wishes 
around the screen in different 
paper and ink colours, by us- 
ing the cursor keys and the 
space key. Once you have se- 
lected all of the windows your 
program will use, a small Basic 
program is created which will 
open the windows as you have 
set them out. 

When sending for the pack- 
age, cheques must be made out 
to D. Santiachiara. Please note 
that you must add a £4 con- 
version fee if the cheque is 
made out in sterling. This may 
seem expensive, butif yousend 
a Eurocheque in Lire, the 
cheque fee is only £1. There are 
discounts if you buy more than 
one program, and the cheque 
conversion costs only apply 
once for each cheque. 


17 


= = atta saaamasasmammmmmstaas ss 


ith the advent of Miracle's Gold 
Card anew quantum leap has 
been made in the weird and 
wonderful world of the QL. The 
| gestation period has been along one, but 
finally the spectre of a modern version of 
everyone's favourite computer seems to 
have been transformed to reality. 

There was a time when the QL's hopes 
and future looked so bright and full of 
potential. | for one knew when the first ads 
came out that this was the machine for 
me. | migrated from a very suspicious 
attitude to computers — the Big Brother 
syndrome via the Hewlett Packard HPCX 
programmable calculator, to the QL back 
in 1984 or so. Despite the blurred images 
on a portable tv, the ever-whirring 
microdrives, the obscure crashes, argu- 
ments with the printer, the Medic Saga, 
and... you name it, | always had the faith 
that the Quaint Lump was designed to 
work, and that with perseverance it — 
eventually — would. 

All along the way rumours abounded 
about upgrades — faster, better, cheaper, 
The Thor, Futura, transputer cards, 
somehow none of this seemed just rightin 
the same way as the QL when it first 
appeared. 

When the Atari QL Emulator arrived | 
again had that inkling that this was 
somehow spot on. | rushed in, about two 
years ago now, but, looking back, | dis- 
covered that there was virtually nobody 
else there. | attempted a few articles/ 
reviews on the machine, but they all 
seemed too, too enthusiastic to sendin. In 
this review — rather more practical than 
technical—| hope to show amore balanced 
view. 

To begin with, admittedly, there were 
hiccups. It was the QL tale all over again. 
However, things have settled down and 
what we have here is the QL as it could 
have been had its development with 
Sinclair not been untimely cut short. 

First of all you have a stylish grey box 
with a built in 720K disk drive, an excel- 
lent, separate keyboard (this is the Mega 
ST), anda mouse. At the rear are an array 
of ports: dma (hard disk, co-computers), 
additional disk drive, monitor, MIDI in, 
MIDI out (musical instrument digital in- 
terface), parallel, power, and serial. There 
is also an on/off switch, and the reset 
button at the rear. The 128K rom port sits 
| on the left side of the cpu. Inside is an 
8MHz MC68000 16/32bit processor, up to 
4 Mb of ram, battery backed clock, floppy 


The OL on the ST 


Per Witte is a happy 
and successful user 
of Jochen Merz's QL 
emulator on the Atari 
Sr 


controller and assorted chips, not all of 
which are currently relevant to the QL. 
The emulator card has to be mounted 
inside the machine. It involves removing 
the Shifter chip, plugging in the emulator 
pcb, re-fitting the Shifter, bending a few 
pins on the GLUE and, finally, soldering 
seven wires on to various points. 

Once the machine is fitted out and con- 
nected up it can behave either like an Atari 
ST or a QL. The emulator software starts 
up as a normal Atari program, and then 
takes over the machine completely. At the 
familiar F1/F2 screen it is wise to boot up 
the QL software that is supplied with the 
emulator. This includes Tony Tebby's 
Toolkit2, new drivers for floppies, hard 
disks, ram disks, ser, par, prt, pipe, null, 
keyboard, new screen drivers (Pointer 
Environment), Things, mouse drivers, and 
a host of utilities: conversion of disk for- 
mats (Atari, IBM), menus, TRAnslates, 
Hotkey system II, and much more. 

In use the QL-emulating Atari works like 
avery fast (two to three times) QL, with no 
hitches and, in my experience, very few 
compatibility problems. True, you cannot 
access microdrives directly, so those 
naughty programs that are microdrive 


bound, such as Psion Chess, and the 
likes, are, unfortunately not generally 
available on this machine, though a 
number of these programs can be (and 
have been) hacked to run without the 
microdrives. Also QL-specific hardware 
add-ons are of course not possible. This is 
not a problem for me, but for some it may 
be a major drawback. 

For the sensitive-of-hearing there is 
another hitch: the fan (on the Mega STs 
only). It is not extremely noisy, but it is 
there, humming away at all times. There 
are ways around it. The way | have gone 
is to buy ahard disk—because it makes so 
much more noise, you can hardly hear the 
fan —a rather drastic cure. 


Advantages 


The advantage of this particular system 
is that you have a fast, comfortable ma- 
chine, with lots of memory, reasonably 
priced peripherals, reasonably good 
support, 99% QL software compatibility 
(JM/JS and equivalent), excellent bun- 
dled software; a 'free' Atari computer with 
access to accelerators, other emulators 
(Mac, IBM, Beeb, CP/M, Atari 8bit, and 
possibly others), and some very good 
software (music, dtp, graphics, languages, 
comms, PD, games), a very versatile 
machine indeed. (I Know the Amiga is a 
more desirable machine from a QL user's 
point of view, but it is just because the 
Atari is so ‘plain’ that it makes a good 
emulator host.) 

There are some disadvantages. Hard- 
ware incompatibility may be a serious 
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disadvantage for some users, though there 
are ways to work around some of the 
problems: roms can be catered for with a 
special adaptor, | believe, otherwise they 
can be loaded into ram with a special 
command ensuring that they occupy the 
correct position in the memory map. Most 
software can be transferred from 
microdrive to disk (microdrive emulation 
is supported for those who cannot or will 
not convert their programs). Hardware 
that is addressed via the serial or parallel 
ports (eg modems, printers) should work, 
while some types of hardware, such as 
memory expansion, disk-drive and parallel 
interfaces are made redundant. There is 
no network on the emulator. This may 
come in time, using the MIDI or serial 
ports. 

| have kept my old QLs — they are too 
much of a bargain. If | want to play the odd 
chess game | do it on the QL, as before. 

| would like to spend some time on the 
software that comes with the emulator, as 
it could be considered integral to the 
system. 

The first major difference that one dis- 
covers, after the initial glee over the slick 
speed and quality of the machine, is the 
Pointer Environment (PE). This system, 
for which Tony Tebby is responsible, turns 
multitasking into what it should really be: 
non-destructible windows with the saving 
of contents during task-switching, the 
ability to use the mouse to select from 
menus and perform other tasks, and the 
provision of a configurable user interface 
that uses standard tools to perform stand- 
ard operations. 

The idea is that each task is attached to 
a main window. Within that window the 
task’s interaction with the user takes place. 
Other windows owned by that task can be 
opened within the main window, to present 
a menu, for example, or to display a 
message. The main windows are ‘stacked! 
one on top of the other, giving the illusion 
of a desk piled with ‘live’ sheets of paper. 
One can cycle through the pile using *C, 
which is a bit like shuffling through the pile 
on your desk to find acertain sheet; or you 
can use Hotkeys, which simply call up the 
sheets you want straight away; or you can 
use the mouse. If you can see even just a 
tiny corner of the sheet you require, move 
the pointer to it and click. Presto! The 
required sheet is brought to the top of the 
pile, awaiting your pleasure. 


Moved around 


Those programs that are specifically 
designed to work with the PE (and there 
are a growing number of them), can usu- 
ally be moved around the screen. For 
instance, you are typing in Quill, callup a 
calculator, move it somewhere else to 
prevent it from obscuring the text/data you 
are working on, do your calculation, stuff 
the result in the stuffer buffer, click on 
Quill, and squirt the result back into your 
document. Windows can also be resized 
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if appropriate, simply by using the mouse. 
Old programs, such as the Psion Four, 
cover the whole screen, losing some of 
the versatility of the PE. Still, they can be 
used to advantage within the system. 

Most of this is transparent to the user, 
who can continue to use the machine as 
normal, though with less hassle. A disad- 
vantage of the PE is the considerable 
amount of money that is taken up with 
screen saves. Part of this is offset by the 
technique of code sharing, by which a 
single copy of a program can run as 
multiple taskes, only taking up additional 
space for data. Other task swappers can 
also do this, without the memory con- 
sumption of screen saves but to be quite 
frank, if you have got the memory, there is 
no real contest for efficiency and ease of 
use. Hotkeys are not only used to load, 
wake and pick up tasks. You can also tie 
SuperBasic commands to hotkeys; or a 
series of key presses relevant to other 
programs, such as Abacus. This gives a 
virtual macro-capability to the QL. A very 
nice touch indeed. 

In this way it is possible to tailor-make 
your working environment to what suits 
you — and the task in hand — best. It is not 
easy to come to grips with some aspects 
of the system, especially not for those 
who prefer just sticking a disk in flo1_ and 
letting the program take control (but they 
should really have bought a PC in the first 
place, shouldn't they?). The pointer envi- 
ronment and hotkey system is available 
for the Sinclair QL too, but it really comes 
into its own on a fast machine with a 
megabyte of memory or more. These are 
not major requirements when you con- 
sider what other operating systems (Win- 
dow, PS/2, Unix) require just for breathing 
space. 

The manual that comes with the emula- 
tor is adequate to get you started. Most of 
the really powerful features will remain 
hidden for all but the most determined 
hacker, as they do not seem to be docu- 
mented anywhere in the manual. "What 
you don't know won't hurt you” may be 
true in some respects, but trying to write 
programs yourself that must be compat- 
ible with features that are not documented 
could cause frustration. 

! live and work in a community with 
people with learning difficulties. In addition 
to the toil of everyday life | work with 
administration, accounting, records, ap- 
plications and so on. In the beginning all 
our administrative chores were done by 
hand, the methods evolving over the years 
as the Community grew and established 
itself. By the time | joined, about five years 
ago, the paperwork was increasing, and 
four people were tied up in the office, part 
time. | brought my QL with me and used it 
as my personal computer. Little by little | 
took on more of the administration, espe- 
cially the book-keeping side of things. 

For a while | flirted with the idea of 
purchasing an accounts package with a 
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computer to go with it, if necessary, but | 
didn't find anything that | felt would let us 
do things our way: we were expected to 
conform. | find office work a bit tedious. 
Luckily | found computing extremely inter- 
esting, so by combining the two | found 
that aspect of life quite tolerable, and got 
the job done at the same time. The result 
is that many of the tasks that need to be 
done can be done the way that suits the 
style of the Community, and the prefer- 
ences of those who are doing them. 


Accountancy 


| use Quill, Abacus, Archive, QPAC2, 
and my indigenous accountancy program 
ACC, every day. Additional help programs 
suchas QPAC 1, QTYP (the spell checker) 
and assorted utilities to make life easier 
are also in constant use. One of my QLs 
got anew keyboard and has been used by 
our secretary for the last year or so. A few 
months ago we decided to go the whole 
hog and the Community purchased its 
first computer: an ST Mega 2 with emula- 
tor. Secretary Cathy is mightily impressed, 
and she's getting the hang of things now, 
Yes, ithas taken sometime, partly because 
she had to unlearn everything she knew 
about the other computer, not really 
coming to grips with multitasking, also 
because previously there was very little 
room to manoeuvre. Between us we now 
have an Epson LX80 dotmatrix printer 
anda Hewlett Packard Deskjet+. My Mega 
4 has a hard disk, which is convenient, 
albeit noisy. 

When two or more users are working on 
similar data, it would make sense to have 
some kind of networking capability. At 
present we have no relevant programs 
that can take advantage of such a capabil- 
ity, perhaps because the QL's net, though 
very flexible, is too slow for professional 
work. |can never get enough speed! Sort- 
ing, searching and calculating should re- 
ally zip along. 

My main wish, though, would be for 
quieter and smaller machines. Apart from 
the latter, | think I've got everything I need 
at the moment. As for the rest, I'm per- 
fectly happy to sit back and wait for evo- 
lution to take its course, provided that 
involves keeping the QL alive! 

The emulator can be obtained from a 
number of sources. My first one | bought 
from Futura Datasenter in Norway. The 
Mega 4 | got from Strong Computer Sys- 
tems who installed the card and kept me 
in warranty. They were very helpful and 
bent over backwards to keep me up and | 
running. Unfortunately they don't seem to 
be in the QL market any longer, and so | 
took my business to Jochen Merz in 
Germany where, despite the distance, | 
have had very good service and support. 
Tony Tebby, who has written most of the 
propriety emulator software, and Jochen 
Merz, ensure that the emulator is of ex- 
cellent quality and are continuously up- 


dating the system software. 


How does this compare with other op- 
tions? Take an ST Mega 2 at £615 (June 
91). The total for machine, emulator, soft- 
ware, floppy adaptor, and installation, as- 
suming re-use of everything else you need, 
is approximately £850 including VAT and 
p&p, to a round figure. 

The Gold Card from Miracle Systems is 
£375. This may be all you need. You may 
however want a mouse (£50 incl. interface, 
excluding RTC), akeyboard (£100 interface 
+ cheapish XT keyboard), installation of 
the above (£25, say}, and an additional 
disk drive (around £50). The total comes to 
about £600. 

Thors, if obtainable at all, are more ex- 
pensive than a corresponding ST. 

Stay with your existing system and it 
costs you nothing but your time. 

What it costs depends on the difference 
between your needs and what you already 
have. Obviously the Gold Card represents 


cance, | think, is that more money then 


to £800 (4Mbytes), and the emulator card, goesin the direction of people who support 


Ataris with the emulator ready installed including software for about £200. (Impor- the QL (rather than Atari Corp). The extra 
can be obtained from Jochen Merz, and tant: check with your emulator supplier speed of the Gold Card is considerable, 
also some British dealers (look out for their which models are NOT suitable before you and it will cost you £200 extra to achieve 
ads). The Community machine | got from buy!) Installation can either be done by the _ that on the Atari. The Atari option gives you 
Evesham Micros, who are not too faraway brave hobbyist, for about £25 at Evesham three(-ish) computers rather than one, don't 
from where | live. They installed the Merz Micros, and possibly for about that else- forget (2Mb Atari/QL plus your old QL), so 
emulator for me and promised to honour where. Youmay be abletouse your existing it's not a bad deal either. There are other 
my warranty provided the emulator was monitor. For the rest, disk drives, most pros and cons either way. Whatever you 


not to blame. 
You need to buy an Atari for £250 (512K) 


software, printers andparaphernaliashould do, keep QLing for general computing it's 
still be compatible. 


still among the best. 


| SOCHEN MERZ SOFTWARE ‘ie ucmrs't!= 


NEWS: The curent emulator software is level D (named pipes complete 
Extended4-Screendriver & more}. There are new updates on QD (e.g. 
PRINT always works now), on Menu etc. NEW PRODUCTS: The QDOS 
Reference Manual, EASYITR Il and QPrommer. Finally, credit cards 
welcome now! 


QL-Emulater (Hardware, QUUMP’s Drivers AtariDOS & utilities}€166 
EPROM Cartridge for $T(makes machine autoBOOT), switchable £33 
Centronics Cable for $T: 2m £6.50, 5m £10.50 MIDI Cable 2m 
£3.50 

ST-Monitor-Cable: Scart £9, Cinch £11, Amiga 1084S £13 

Floppy Adaptor to connect QL-Disk-drives to the ST £9 


QDesign — A new graphics program which uses the Pointer Environ- 
ment. Very easy to use, with extras never seen before in a QL graphics 
program: Editable area ranging 512x256 pixels up to 2880x2880 
{depending on your RAM) You can even load monochrome 640x400 
ST pictures and use them. Page View, Scaleable Vectorfonts etc, £38 


QD Ill — Very comfortable text-editor, running under the Pointer 
Environment, Many features (e.g.Menu, Scrap) £38 Upgrade from VI 
or VII£10 


QPTR —Re-released & Updated! Toolkit for Machine Code and BASIC 
Pointer Environment Programmers. Revised manual & keys/' macros 
updated, CONFIG is also explained. £30 Update (new manual & disc) 
£14 


QMENU — Many QD Users will know it: the Menu Extension. Now with 
more facilities, even real subdirectories are treated in a new file-select 
window. Programming instructions and examples for SuperBASIC and 
machine code. A Scrap Thing is also implemented now! £11 


QPROMMER — Menu-driven, very comfortable EPROM-programmer 
software which allows you to use the ATARI Junior-Prommer under 


QDOS. £19 


EASYTPR II — Create your own Pointer Environment menus & sprites 
and use them in your own SuperBASIC or m-code programs. Many 
users waited for this package, as creating Menus was not easy, until 
now! Put all the items you need on screen, thats it! Supports all the sub- | 
windows and uses the Menu Extension! Now even complete applica-_ | 
tion-sub-windows may be created! Many examples! £49 

EASYPTR || — Budget version £29 

Upgrade from version 1 £10 


NEW! NEW! NEW! 


QDOS Reference Manual — This book is a must for all m-code 
programers. It explains how to use QDOS, all traps and vectors, the 
Thing System, the HOTKEY System Il and much more. It points out which 
features work on a QL, an Emulator and how to write compatible for 
future operating systems. DIN A5, 170 pages. £30 


DIAMONDS — A “just one more go” game to keep you up at night, £11 


QLQ £21 Thing & EPROM Manager £18.50 Firebirds £10 
Brain Smasher! £12.00 QSUP£26 Arcanoid II £10 
lon Gold and Doppel lon £10 Super Games Pack £25 


Pack of 10 3.5" Discs MF2DD incl. Labels £3.10 
Keyboard Interface (for |BM-type PC/XT keyboards) £41 
QIMI — QL Mouse Interface with Real-Time-Clock £41 
High Quality Mouse for QIMI or ATARI ST £27 

QIMI without RTC (for Gold Card) £37.50 

Adaptor AMIGA mouse to ATARI or QIMI or v.v. £2.50 EN 


& 


Please add £4.00 for postage and package. 
All programs except Arcanoid, Firebirds & lons need 


memory expansion. All prices excl, V.A.T E&OE eS 
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good value, and of considerable signifi- | 


THE NEW 
USER GUIDE 


Part 6 of the New User Guide builds up FOR S ECTI ON 
and REPEAT loops which allow processes to be 

repeated automatically — and embedded within 
other repeated processes — under the 
programmer's control. 


long time ago | was shown how to prepare a car for display on a garage forecourt. ‘Here 
is a typical car. Wash here, polish here, steam clean the engine compartment, brush out 


the boot.’ 
3 ‘Now,’ instructed the forecourt owner, with a grand sweep of his arm, ‘do the same for all 
of those.’ 
So far in this tutorial there has not been aconcise method of giving the computer similar instructions 
to repeat a sequence of commands. The nearest we have come to it is the multiplication table 
program where a GOTO statement has redirected the computer back to a previous line: 


100 LETN=2 

110 PRINT N* 4 

120 LETN=N+1 

130 IF N = 13 THEN STOP 
140 GOTO 110 


This routine undoubtedly works, but itis more than alittle cumbersome. It takes up five lines, itdoes 
not show at a glance what is going on and the line which should be most prominent — the instruction 
to multiply N by 4 at Line 110 — is lost among the other statements. 

The essence of the routine can be summed up using one word for each statement: initialise; 
calculate; increment; test; loop. SuperBasic very helpfully has a single statement which combines 

FOR N all but the calculate stage, shortening and simplifying programs. 

The key to reducing the above five program lines to just two is to recognise that we are here dealing 
with a range of values for the variable N. The routine could be written in English as ‘For each value 
of N from two to twelve, print N multiplied by four’. SuperBasic would be criticised mercilessly if it 

* were so verbose, so the programming equivalent of the first part of the sentence is: 


100 FORN =27T0 12 


In Basic this forms a complete statement, and so it can stand on a line by itself. The second part 
of the sentence, the action which must be repeatedly carried out, follows on the next line: 


100 FORN=2T0 12 
110.PRINT N*4 


In English we can use a full stop to indicate that the sentence is finished. SuperBasic has to allow 
for the fact that the actions being carried out might occupy a number of lines, and so a special 
statement is needed to complete the FOR loop: 


100 FORN=2T0 12 
110 PRINTN*4 
120 END FORN 


The variable in the FOR statement, N, is no different from other numeric variables, except that it 
is automatically incremented on each cycle of the FOR loop. Nevertheless, variables used in the 
control of loop structures have been given special names, such as ‘contro! variable’ and ‘loop 


identifier’. 
Note that the lines between a FOR statement and its END FOR successor are usually indented 
so that the structure of the program is clear from a glance at the listing. 
= Some program editors automatically increment lines in this way (Archive is a good case in point), 
but thanks to the QL’s ultra-simple line editor programmers have to remember to do the job for 
themselves. 
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Figure 1: The FOR loop structure. 


The use of FOR...END FOR has radically improved the clarity of the program, but the earlier 
promise to reduce five lines to one has yet to be achieved. Alone among all Basic dialects, 
SuperBasic employs the concept of a ‘short form’ of its structures. This means that, provided that 
a structure is wholly contained on a single line, the final statement can be omitted. 

The example programs in this series have so far contained one statement per line. To place many 
statements on a line itis necessary to separate them using a colon — the more English-like fullstop 
cannot be used to end statements because of its role as a decimal point. The FOR loop can 
therefore be shortened to: 


100 FOR N =2 TO 12: PRINT N*4 


SuperBasic makes the same assumption that we do when obeying the instruction ‘For values of 
N between two and twelve...”, ie that only whole numbers are intended. This is not always going 
to be true, so SuperBasic allows different increments to be specified. The numbers between four 
and 100 which are divisible exactly by four can be quickly listed using the line: 


100 FOR N =4 TO 100 STEP 4: PRINT N 


The English equivalent would be ‘Print every fourth number between four and 100’. The STEP 
number does not have to be a whole number, nor does it have to be positive. The following two 
examples count down from ten to one and count up from zero to one in small increments: 


100 FOR N= 10T01 STEP -1: PRINT N 
200 FOR N=0 TO 1 STEP 0.2: PRINT N 


FOR loops can be embedded within other FOR loops. You might, for example, want to print every 
one of the multiplication tables from two to twelve using one program: 


100 FOR number = 2 TO 12 

110 FOR multiplier = 1 TO 12 

120 PRINT number;” x “; multiplier; 
130 PRINT “ =“; number * multiplier 
140 END FOR multiplier 

150 END FOR number 


Note the way that incrementing the line indents highlights the structure of the program and makes 
it easy to see where each loop begins and ends. The important thing to note here is that the 
‘multiplier’ loop is wholly contained within the ‘number’ loop. It should be obvious that if the END 
FOR multiplier line occurred after the END FOR number line then the program would produce 
nonsense. The concept of containment extends to the use of GOTOs inside FOR loops: they should 
not direct the interpreter to a point outside the bounds of the FOR and END FOR statements. 

An interesting feature of this routine is that it prints 132 lines of information using just one more 
program line than our initial example. It is a simple demonstration of the way in which computers 
can be programmed to undertake repetitive tasks with very little effort. The program can be 
expanded to provide the first 100 multiplication tables, each one with multiples between 2 and 1000 
if necessary, simply by changing the values in the FOR loops. 

FOR loops are fine provided that the programmer knows in advance the range of values which 
will be used. There are many occasions when this will not be the case. The first resort is to change 
the absolute range values for variables. 

Take a routine to print out all of the dominos from double blank to double six: the obvious loop 
structure will print out more dominos than there are in a set: 
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100 FOR left = 0 TO6 
110 FOR right =0TO6 
120 PRINT left; “ : “; right; *“ 
& 130 END FOR right 
140 PRINT 
150 END FOR left 


A quick check of the printout from this program reveals that dominos such as 3:5 are also included 
as 5:3. The only dominos not to be printed twice are the doubles. The listing needs to be altered 
to remove the duplicates by changing the inner loop: 


100 FOR left =0 TO6 

110 FOR right = 0 TO left 
120 PRINT left; “: “; right; “ “; 
130 END FOR right 

140 PRINT 

150 END FOR left 


The best way of understanding the exact effect of this seemingly minor change is to type in the 
listing and run it. Watch carefully for the punctuation in the PRINT statement on Line 120. 

Programmers can also feel trapped by the regularity of the STEP feature of FOR loops. What 
happens if the values taken by the loop control variable are not equally spaced? For instance, what 
if the first six prime numbers had to be printed? SuperBasic, uniquely, permits a series of comma- 
separated values to be used instead of a range, which allows it to meet our needs perfectly: 


* 100 FOR prime = 1, 2, 3, 5, 7, 11 
110 PRINT prime 


120 END FOR 

The FOR...END FOR structure has many sophistications, some of which have yet to be covered R bE Pe at 
here, designed to cope with specific circumstances. However, enough of this powerful structure's 
abilities have been covered here to cope with most needs. loops 


There will be circumstances where a loop will cycle an unknown number of times, perhaps even 
permanently until the program is exited. This could be simulated using a FOR loop with some very 
large parameters, but SuperBasic provides a better way with another structure called the REPEAT 
loop. 

Like the FOR loop, REPEAT loops have special statements at their beginnings and ends between 
which appear the program lines which are to be repeated. Here is a typical example of a REPEAT 
loop: 


100 REPeat loop 
110 PRINT “Hello “; 
120 END REPeat loop 


The characteristic capitalisation of the word ‘REPeat’ is forced by SuperBasic. Itindicates that lazy 
programmers can get away with typing only REP and leaving the Basic editor to do the rest. This 
feature only applies to the longer structure-related keywords, which makes one wonder why it was 
adopted at all. 

Returning to the code in hand, the effect of putting the PRINT command between the REPEAT 
statements is that it is repeated forever, or at least until either the CTRL-SPACE key combination 
is pressed or the computer is reset. A short form of the REPEAT structure is available governed 
by the same rules used in short FOR loops. The above example could be rewritten as: 


a eye PSPUAE False 


100 REPeat loop: PRINT “Hello “; 
This is the exact equivalent of the old chestnut typed countless times into shop display computers: 


10 PRINT “Hello “; 
20 GOTO 10 


Amore substantial example of a REPeat loop is contained in the original QL User Guide (Dec 1984 
reprint), but it is not a good example of programming. The routine plays a guessing game: anumber 
is randomly thought of by the computer and a succession of inputs are requested until the player 
guesses the number. A neater version of the program is: 


100 LET target = RND(9) 

110 REPeat gameloop 

120 INPUT “Guess the digit..”; guess; 

130 IF guess = target: EXIT gameloop 
& 140 PRINT “is wrong” 

150 END REPeat gameloop 

160 PRINT “Well done!” 


Sinclair/QL World August 1991 27 


ims ee rer EE 


EXIT 


IF «ELSE 


The vital point about the structure of this game is the inclusion of the EXIT command, otherwise 
the REPEAT loop would repeat forever. It is usual for EXIT commands to be contained within IF 
structures, otherwise they would be acted upon during the first cycle of the REPEAT loop, which 
rather takes away the point of it all. Note that, as in END REPEAT statement the loop’s name must 
be included in EXIT statements. 

Loops can contain as many EXIT statements as might be needed, although it is usually a good 
idea to stick to just one or two to avoid confusing yourself. EXIT statements also have a role to play 
in some FOR loops where, again, they must be followed by the loop identifier. The value of the EXIT 
command is that it tells the QL that the loop is finished with and can be forgotten. If a GOTO 
command was used instead, the QL would spend the rest of the program thinking it was still 
somewhere in a big loop. 

The short form of the FOR and REPeat loops can be borrowed by the IF structure. This provides 
consistency, meaning that programmers have less to remember when phrasing their commands, 
and it can ease readability by removing the THEN keyword. Here is a short IF clause: 


IF x = 5: PRINT x 


The compatibility between short forms should alert you to the possibility that there is a long form 
of the IF structure. Only a few Basic dialects allow multi-line IF structures, but SuperBasic is one 
of them: 


100 IF account < 0 

100 PRINT “Account in red!" 
120 LET overdraft = 1 

130 INK 2; PAPER 7 

140 END IF 


There is, of course, no point in having an EXIT clause in an IF statement, nor is there a structure 
control variable with which to label the EXIT, and so compatibility does not quite stretch this far. 

A very useful addition to the IF clause is the ELSE keyword. Very often, two courses of action 
suggest themselves according to whether or not something is found to be true. In English we might 
say ‘If itis dry | shall go shopping, otherwise | will read a book’. The computer's equivalent is very 
similar: 


100 IF account > 0 
110 INKO 

120 ELSE 

130 INK2 

140 END IF 

150 PRINT account 


There are times when even two courses of action are not enough to cope with circumstances. It 
is possible to nest IF statements so that the program becomes a succession of IF..ELSE..IF..ELSE 
lines, but a much neater structure is available using the SELECT keyword. Using SELECT, a 
number of ranges can be tested for. Each range can have a set of actions associated with it. 
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LINE 110: A random number is selected. iu 


LINE 150: Zach guess is counted. 14 x = ANI 
{ LINE isC: The gap between the guess ang tore 129 LET TAIES - u 
i mystery number 18 calculated. 120 HEPeat GAME 
wINE 120; Every locp must nave its EXIT! 140 INPUT "Your guesa .,. “; GUESS 
j ULNE 26u; Be caretul with negative number 180 LET TRIES = TALES + i 
\ ranges i 160 LET DIFFERENCE = 


LINE The result :s printed " I 


vo SELect ON DIFFER 
140 
196 
206 


To demonstrate SELECT’s value, let us expand the guessing game a little so that the users are 
given hints according to how close they get. See Listing one for the program code. The difference 
between each guess and the target number is calculated and then tested to see in what range it 
fits. An appropriate message is then printed. Notice the REMAINDER keyword, which must be the 
last range to be specified if it is used. Readers comparing the syntax with that appearing in the old 
User Guide will see that the program example is much more concise and easier to read. 

The use of ranges in the SELECT structure allies it more with the FOR loop syntax than with that 
of IF statements. In fact, any ranges and lists which are permitted in FOR commands are also 
permitted in SELECT commands. This is only sensible because it means that both QLs and 
programmers need only remember one set of syntax rules. 

The intelligent application of structures provides the skeletons for programs: the other commands 
are merely the flesh. With this section of the New User Guide your programming horizons have * 
been greatly expanded. It may be surprising, therefore, that we have yet to reach the commands 
which make SuperBasic super... 
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ention Archive to me, and | 
think of dusty files in a dimly- 

lit basement— maybea stoop- 

shouldered, wire-frame- 
spectacled archivist totters among the 
shelves, dwindled into a hoop by years of 
poring over yellowed bits of paper. Of 
course, there is also the QL program of this 
name. For many — me among them — 
this original piece of free software has the 
same charm as a real-life archive, and is 
just as useful for everyday purposes. 

There are those who use Archive as their 
standard database, and seem to get on 
withit. | gave it up as soonas possible, and 
have never regretted it. Instead, I turned 
to FlashBack, a user-friendly program with 
which I have had a relationship of grow- 
ing fondness. Recently, DATAdesign has 
shown signs of coming between us — 
chiefly because it has the advantage (for 
me) of having been designed to operate 
under QRam or Qpac. 

To begin with, let’s be fair to Archive. 
This program is unbeatable in some areas. 
It has many features, but its main advan- 
tages, | would say, are: 


1. The size of file is not limited by your 
computer’s memory, because information 
is stored on whichever medium you use. 

2. Your screen display is user-definable 
by using the Sedit procedure. 

3. Archive offers a sophisticated pro- 
gramming language. 

4, You can have more than one file open 
at once, to make links between them. 


So Archive is in the heavyweight class, 
and is very flexible. Neither of the alterna- 
tives I have used can match its flexibility 
and range of facilities. 

Archive is not without its problems, 
though. Of course, what seems to one user 
a problem, may not seem so to another, so 
this summary of the major drawbacks of 
Archive is another personal list: 


1. Commands have to be typed in full — 
and correctly! 

2. Archive is pernickety over things like 
spaces and trailing quotation-marks — 
and not always consistently so. 

3. It is dreadfully slow. 

4. | have always been terrified of failing 
to ‘close’ a file and corrupting it. 


Compare either FlashBack or 
DATAdesign and you quickly see their 
advantages in simplicity of use. In 
| FlashBack, two or three key-presses at 
most are enough to access the commands. 
In DATAdesign,a quick flick of the mouse 
is sufficient. Since both hold complete files 
in memory, you have to try quite hard to 
makea mess of your database— I havenot 
managed it yet, and I rate high in the 
carelessness stakes. Both are phenom- 
enally fast at searching a file, partly be- 
cause they hold the file in memory and 
have no need to access a medium, but 
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largely also because both are very nifty 
examples of the programmer's art. There 
will be a couple of rough-and-ready 
benchmarks later. 

So, what have FlashBack and 
DATAdesign got in common? Both are 
simple card-index systems. Both are 
memory-based. FlashBack in its Special 
Edition and DATAdesign need memory 
expansion. Neither of them offers muchin 
the way of screen design —just simple re- 
sizing or re-positioning or alteration of 
default colours. Both can contain multi- 
line records in any field. Both cost money! 

There are differences in concept. 
DAT Adesign is menu-operated, and you 
navigate with a mouse, or with cursors 
and ENTER. You can also access com- 
mands by their (usually initial) letter-code. 


ALTERNATIVES 
O ARCHIVE 


FlashBack and DataDesign are popular variations 
on the database theme. Michael Evans compares. 


You cannot use the QJump mouse with 
FlashBack, but navigation and commands 
are just as easy. There are three ways of 
accessing commands: CTRL /letter, F3and 
letter, or from the commands list. 
FlashBack is not menu-operated; if you 
don’t mind memorising the commands, | 
you may prefer not to have the nuisance of | 
menus constantly popping up is a nui- 
sance. 

You can have more than one 
DATAdesign present, if your computer’s 
memory runs to it, and if you think there 
is any point. You can have more than one 
FlashBack too, and each can use two 
screens, which handle data in slightly dif- 
ferent ways. 

Now let's look at some specific features 
of these programs. They offer similar fa- 


FlashBack (*SE) DAT Adesign 
File handling: read load 
write save 
save as 
*selective write 
merge text file 
Data handling: next next 
back previous 
first begin/ first 
last end /last 
delete delete 
*index sort 
group. . . kill 
- kill 
create n/a 
search. . . *replace search 
view view 


edit (fieldname) 
undo changes 


*xclude/include 
* (separate) 


Output: 
(report ) 


(generator) 


printer 


transfer text 
adjust window 
re-position 


Screen handling: 


new field 
erase field 
truncate 
forget file 


print panel 


resize (standard) 
(QJump features) 


ALTERNATIVES TO ARCHIVE 


cilities, though they sometimes use differ- 
ent commands as shown in this table (the * 
means that the facility is available only in 
the Special Edition of FlashBack): 


HELP 


COMMANDS create look 
delete display back 
insert last 


open close 
alter find 
next = quit 


COMMANDS 
F3 


Itisimmediately apparent that FlashBack 
contains more features than DATAdesign. 
This does not necessarily mean that 
FlashBack is better! Let’s look at the differ- 
ences a little more closely. 

It’s initially disconcerting, for instance, 
that DATAdesign has no ‘create record’ 
command. In fact, the design of the pro- 
gram means that such a command is un- 
necessary: a file always contains a blank 
record, and as soon as you fill it up, an- 
other blank record is created to replace it. 
So to adda record, you just move to the last 
record in the file. This seems to me to give 
it an edge over FlashBack, especially be- 
cause the quick way to create a record in 
FlashBack is CTRL/c — which means that 
if you are multitasking, attempting to cre- 
ate anew record this way will just take you 
ona review of your current tasks! Fortu- 
nately, of course, you can also use the F3/ 
c combination to perform the same func- 
tion. Here, then, we have to give top marks 
to DATAdesign. 

The same attention to ease of use in 
DATAdesign is evident in the need for a 
Save As command. It’s necessary because, 
if you Save, the program automatically 
updates the filename you last loaded in. If 
you want to change the filename, you use 
Save As. 

Another file-handling facility in 
DATAdesign is Forget — which simply 
empties memory. Not, perhaps, an essen- 
tial command. In FlashBack you can do the 
same job by reading in an empty file. 

Against this, FlashBack has the ability to 
merge a text file — a facility I have yet to 
use — and, in the special edition, a selec- 
tive Write option which is very useful. You 
can Group (Archive would say Select) a 
range of records by reference to some fea- 
ture, say, forexample, including ‘Scotland’ 
in the address, and save only those records 
as a separate file. Then you can use the 
Report Generator to print out all those 
addresses. 

Although both programs have a com- 
mand for ordering records — Sort in 
DATAdesign, and Index in FlashBack 
Special Edition — the operations are re- 
markably different. DATAdesign invites 
you to specify sorting on two levels, in 
normal or reverse order, as letters or as 
numbers. FlashBack SE offers the order 
‘ABCabc’, ‘AaBbCc’, or ‘aBcDEf’ (case-in- 
dependent), and may sort either alpha- 
betically (the default) or numerically. Non- 
special FlashBack offers only a simple or- 
dering procedure by means of the Group 
command. All three programs allow or- 
dering on specific fields — ie, in a phone- 
book file, you could order the names, or (if 
you're betteratremembering numbers than 
names) you could order the telephone- 
numbers. 

One other important difference between 

| DATAdesign and FlashBack SE data-han- 
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Fl 
PROMPTS 
F2 


Logical name 
Librarys 
Titled 
Categorys 
Submitted 
Authors : COGSWELL LE 
Ravisedt : 

Textih 
TextZ$ 
Text3$ 
Text4s : 
Taxt5t 3 
Text6t : 
Taxt?$ 


Text9$ : LIB_SCRIPS/D_09 


dlook " Libguide_dbf" 
rdisplay 
> 


Archive screen 


dling facilities is the latter’s Replace com- 
mand, more often associated with word 
processing, but probably very useful even 
though haven't yet needed to use it for my 
own limited purposes. Like some of the 
other facilities in FlashBack it gives you a 
feeling of security to have it there should 
you ever want it. 

DATAdesign is very mucha stand-alone 
program — an executable file dependent 
only on the QJump pointer environment, 
which enthusiasts are likely to have in- 
stalled more or less permanently anyway. 
The single program does everything the 


press ENTER (FS for more) 


: Computer aided design packages, one in Superbasic & a compiled ve 
: Instructions on SCRIP_DOC with a “Beginners Guide” by Brian Davie 
: STARTUP_OOC. Exomple data - SQUARES & HOUSEPLAN, Load basic yversi 
Leun mdvi_scrip_bos & compiled version by Exec_w mdul_scrip_cde 


a | 


package offers for its files, including print- 
ing. The printing procedure is both simple | 
and complicated. A panel opens up on 
screen, into which you type the details of 
the output you want. 

So far so good. But the mechanism used 
to determine layout and spacing is ingen- 
ious enough to make accurate typing, or at 
least careful checking, quite important. A 
number of characters have to be typed into 
a ‘form string’ to instruct the computer — 
‘f’ for a form feed, ‘n’ for whether 
fieldnames are printed, and so on. When- 
ever you want to print a file, you have to 


IPTULA 


DInstructions on SCRIP_OOC with a “ 


rt 
0 
OLIB_SCRIPS/0_89 


Flashback screen 


- I - wind _FB_quanta_dba 


OL SCRIPTULA OC .A.O, 028.92.96 OCOGSWELL .E 0 GComputer aided des 


0 
OComputer aided design packages, one in Superbasic & a compiled version, 


inners Guide" by Brlan Gayies on 
OSTARTUP_OOC. Exemple data - SQUARES & HOUSEPLAN, Load basic version by - 
GLrun mdvi_scrip.bas & compiled version by Exec_u mdyi_scrip_cde 

0 . 


88005 86468 
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:GL SCRIP 
0.7.0. 
126,02 .56 


File length 


COBSWELL {heme 


Computer aided design i one in Superbas i | 
iInstructions on SCRIP_DOC with a "Beginners Guid] } 5 


:LIB_SCRIPS/0_09 


type in the form string again. At the same 
time, you can determine which records 
you wish to print by setting up a compari- 
son string against which each record in the 
file is measured. 

Another important point about the 
printing mechanism is that, if it comes 
across a problem, it just aborts. No mes- 
sage! Would it be so hard to introduce 
some simple indicator of roughly what has 
gone wrong? 

With FlashBack Special Edition you geta 
package including a separate Report Gen- 
erator, and sample templates which you 
canuse oralter, and read into the computer 
to determine, for example, the layout of an 
address label. Although setting up the 
system initially is quite complicated, once 
you have completed it the job is done for 
good, or until you want to alter it. (In non- 
special FlashBack there is no Report Gen- 
erator — just a simple printout command 
which prints whatever records are cur- 
rently selected by the Group command). 

Here we have two radically different 
approaches to solving a single problem. 
Each has its advantages. 

Both packages have a separate ‘import’ 
program for tailoring Archive files — 


Archive 
(Flp Win) 
Access the file and display 1s 12 


first record 


Find ’Z88’ from first record 
with the file in its raw state 
Sort the file by titles 

in ascending order 

Find ‘Z88’ from first record 
in file sorted by titles 
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twink dd_quanita_ddf 
1148457 

Nr of records : 468 

Nr of fields i 


STARTUP_OOC, Example dota - SQUARES & HOUSEPLAN, 
tLrun mdvi_scrip_bos & compiled version by Exec_u 


Datadesign screen 


FlashBack SE can use Abacus files, too. The 
FlashBack system works fine. So does the 
DATAdesign system, but much more 
slowly. | imported the Psion Gazet _dbf 
file into both programs: FlashBack did itin 
two minutes; the SuperBasic DAT Adesign 
import program took 15 minutes! The 
DATAdesign screen gives you no sign, 
while it is organising its file, that anything 
at all is happening, so it’s important not to 
press the reset button on the assumption 
that your QL has gone off on holiday again. 

Of course, such translation is called for 
only once for each file, so you may feel that 
the expenditure of time is not very signifi- 
cant. Computer users waste so much of it 
anyway, fighting with various features of 
their system, don’t they? 

Itook some simple measurements witha 
stopwatch on Archive, FlashBack SE, and 
DATAdesign. In each case’I used the 
Quanta Library Guide. I did not use the 
fancy Quanta screen with Archive, which 
I feel slows things up a little further, al- 
though it improves ease of use. I used hard 
disk with each program, but in the case of 
Archive, which is more medium-depend- 
ent for its performance, I have also given 
times using floppy disk. I’m afraid I did 


FlashBack SE DATAdesign 
(Win) (Win) 

4 19 

1 1 


6 22 


not have the patience to attempt micro- 
drives! These are the results, with all times 
in seconds; 

Thequickestrunner, clearly, is FlashBack. 
Non-special FlashBackis actually fraction- 
ally faster — presumably because of its 
simpler configuration. Although the fig- 
ures for DATAdesign appear quite a lot 
poorer, both programs are so fast that the 
difference doesn’t really matter for practi- 
cal purposes. Certainly, I don’t feel that the 
difference in speed is important enough to 
play any part in determining which pro- 
gram to buy. Other factors seem to me 
much more significant, and both easily 
outclass Archive. 

Much, but not everything, depends on 
whether you are a user of the QJump 
pointer system. If you are, DATAdesign 
will use it effectively, and you are likely to 
take to the program like the proverbial 
duck. 

FlashBack, on the other hand, is not de- 
signed to work with QRam or Opac. Nev- 
ertheless, you can use it alongside the 
pointer environment, and you can 
multitask it. I do. The important thing to 
remember is that you must always go to 
SuperBasic before accessing FlashBack. 
With that proviso, you can have as many 
jobs going as your computer’s memory 
can cope with. You may well need to make 
some adjustments to the program, or to its 
basic loader, to operate it successfully with 
QJump products. [had toalter cursor speed 
in FlashBack SE to use it with Minerva and 
Qpac; and I had to amend the Report Gen- 
erator boot program to read filenames 
properly with the same combination of 
hardware and software. | found QView 
(Minerva distributors) and Sector Software, 
who distribute the program, very helpful 
in this respect; no doubt Dilwyn Jones 
Computing, who are now also selling 
FlashBack, will be equally prepared to 
advise on modifications if required. 

Non-special FlashBack is around half the 
price of DATAdesign, and represents good 
value for money. But it does not, in my 
view, offer significant advantages over 
DATAdesign, which, on the other hand, 
does have a great deal going for it — ease 
of use, the pointer environment, and aclever 
(and superior) built-in printing system. 

It’s different when you come to FlashBack 
SE. This is a really powerful program, 
which does everything I want of a data- 
base, and a bit more. The fact that the 
manuals for both FlashBack and the Re- 
port Generator are FlashBack files, which 
can be navigated through with cursors and 
function keys, shows what the program is 
capable of. At roughly the same price as 
DATAdesign, it offers a wider range of 
facilities at the cost of considerably more 
complexity. 

This isn’t a criticism of DATAdesign, 
which achieves its aims perfectly — it just 
doesn’t aim at doing all that FlashBack 
does. In the end, any decision between the 
two comes down, as so often, to individual 
preference. 
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a 


any QL owners 

have now moved 

on from micro- 

drives to disks of 
one sort or another and this 
presents a problem to the pro- 
grammer, whoshould try hard 
to cater for the user’s particu- 
lar set up, whether two mdvs, 
two flps, one fdk plus two 
mdvs, or whatever. 

The extent to which a pro- 
gram is capable of taking into 
account these different con- 
figurations will be a major el- 
ement in its success. But how 
can a program know its user’s 
configuration? 

The object of this article is to 
describe a method of accom- 
plishing this from SuperBasic. 
There are ways of doing the job 
with machine code, but they 
are not dealt with here. 


Storage 


Let us assume that you are 
writing a SuperBasic program 
which requires two storage 
devices: one for programs and 
basic data files and another for 
the files that the user will gen- 
erate by using your program. 
The devices may bemdvs, flps, 
fdks or any two from those 
three. 

You have no way of know- 
ing which configuration will 
be used. You cannot assume 
that because your program was 
ordered and supplied on, say, 
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QL systems are 


getting more complex, 
Brian Storey suggest 
ways of allowing 
configuration simply 
from SuperBasic — 
ways which work, and 
ways which don’t. 


a floppy disk that the user will 
not wish to store its products 
on a microdrive cartridge. Af- 
ter all, not everyone has two 
disk drives. 

Let us also assume that your 
program is governed by a 
BOOT program which will be 

called, and RUN in the tradi- 

tional manner by pressing F1 
or F2 from the Sinclair copy- 
right screen. 

To get to know your user’s 
configuration, you could ask 
by means of an INPUT state- 
ment for the mnemonic (FLP1, 
MDV’1, etc.) of the device which 
carries the supplied medium 
and for that of the device which 
is going to carry the program’s 
outputs (FLP2, MDV2, etc.) 
You can then use the two 
strings (prog$ and file$, say) as 
points of reference forthe main 
program’s functions. 


Plausible, butit won't work! 

The stumbling block is that 
when the BOOT program has 
accomplished its main task of 
LRUNning your main pro- 
gram, the precious data con- 
tained in your carefully con- 
structed prog$ and file$ will 
no longer be there. Those 
strings will have been 
CLEARed by the LRUN com- 
mand. They will no longer ex- 
ist. 


MRUN? 


OK. why not MRUN the 
main program instead? That 
will work — no question. 

MRUN instead of LRUN in 
your BOOT will not destroy 
prog$ and file$, so they will be 
available to your main pro- 
gram. 


MRUN, however, carries its 
own constraints, When your 
main program is MERGed and 
RUN by use of MRUN, your 
BOOT program will remain in 
ram as a fairly useless pream- 
ble to your main program, 
wasting storage space for what 
may be a lengthy main pro- 
gram. Besides, you may wish 
the main program to call and 
RUN other programs. You 
would have to MRUN those as 
well in order to preserve progs 
and file$. And you would have 
to be very careful with your 
line-numbering to ensure that 
extraneous statements in the 
main program did not foul up 
your subsidiary program after 
the MERGE. Such difficulties 
are manageable, but they area 
bit of a bore and prone to pro- 
grammer error. 

There is a fairly simple so- 
lution to all of this. There may 
be many more, but this one 
may appeal to you. 

The nub of the problem is to 
preserve prog$ and file$ after 
the BOOT program LRUNs 
your main program. In the 
BOOT, you must ask the user 
to state his mnemonics for 
Drive 1 (programs) and Drive 
2 (program generated files). 
Test the feasibility of those data 
to the extent that you judge 
them to be crash-proof, and 
then (the problem) preserve 
them in such a manner that 
they will not be destroyed by 
further operations. 
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Try doing it like this... 

There are, tucked away in 
the bowels of the OL, some 
bytes known as System Vari- 
ables. They are accessible from 
SuperBasic (PEEK) and even 
capable of amendment 
(POKE), although altering their 
values is not usually recom- 
mended because Qdos uses 
them to run the QL system. 


Reserved 


However, there are some of 
these ‘reserved bytes’ that are 
NOT used by Qdos and, 
moreover, they are not cor- 
rupted by LRUN. By default, 
‘they are set to zero. So let us 
store this essential mnemonic 
data in those unused bytes,and 
our problem is solved! 

The spare System Variables 
that I use for this purpose are 
10 bytes numbered 164068 to 
164077, inclusive. The first five 
are used to store the contents 
of prog$ and the rest to do the 
same for file$. 

Please examine Listing one, 
which is a typical BOOT pro- 
gram. The numbers in the fol- 
lowing commentary refer to 
line numbers in the listing. 

110 calls the PROCedure 
‘get_devices’ which begin at 
160, The code inside loop a (170 
to 210) asks the user for the 
mnemonic (mdv1, flp1, etc.) of 
the PROGRAM file and then 
checks its feasibility in the 
PROCedure ‘check’ (370 to 430) 
which uses the received pa- 
rameter prog$ as its x$. 


Flat to1 


Ifthe string is empty (390) or 
its penultimate byte is not nu- 
meric in range 1 to 8 (410) — 
you can’t have more than eight 
mdvs or eight disc drives on a 
QL — or its length is not equal 
to five bytes (420) it sets a flag 
to 1 to indicate non-feasibility 
and RETurns to the 
PROCedure ‘get_devices’. If 
that PROCedure finds the flag 
set toother than zero, it REPeats 
loop a which has the effect of 
asking the user for the same 
information again. You could 
improve the presentation by 
arranging for a disapproving 
BEEP if the data is bad and 
even PRINT out a message as 
to what is wrong if you want to 
be really helpful. 

The ‘check’ PROCedure also 


adds an underscore symbol to 
prog$ (390) if the user has not 
typed in one of the pesky 
things. 

Loop b (220 to 260) of the 
PROCedure ‘get-devices’ does 
all of this again for the mne- 
monic of the ‘files’ device. 

So now you have the re- 
quired device mnemonics in 
prog$ (say ‘mdv1_’) and file$ 
(say ‘mdv2_'). It is time to 
preserve them. 

At 120 the BOOT program 
calls the PROCedure 


LISTING 1 


100 CLEAR:CLS:CL#0 
110 get_devices 


‘record_device’ (290 to 430) 
which POKEs the CODEs of 
successive bytes of prog$ into 
the spare System Variables, 
164068 to 164072 (300 to 330). 
Then it takes similar action, by 
making a second call to 
‘record_device’ (with different 
parameters), for file$. 

Now we're in business. It 
only remains to LRUN your 
main program (140) which will 
be able to identify its devices 
from the data recorded in lo- 
cations 164068 to 164077. That 


120 record_device 164068, 164072, prog$ 
130 record_device 164073, 164077, file$ 
140 LRUN prog$ & “Main_prog” 


150 REMark eo 2b a ae oe ee a ee ae a Op 


160 DEFine PROCedure get_devices 


170 REPeat loopa 


180 INPUT “ENTER mnemonic of device which carried your 


PROGRAM" ;prog$ 
190 check prog$ 
200 IF flag = 0: EXIT loop a 
210 END REPeat loop a 
220 REPeat loop b 


230 INPUT “ENTER same for device which will carry your 


FILES” ;file$ 
240 check file$ 
250 IF flag = 0:EXIT loop b 
260 END REPeat loop b 
270 END DEFine get_devices 


280 REMark EE ab ab a a aE 


290 DEFine PROCedure record _device (a,b,x$) 


300 LET x = 1 

310 FOR n=aTOb 

320 POKE n, CODE (x$(x)) 
330 LET x = x+1 

340 END FOR n 


350 END DEFine record_device 
360 REMark DEAR SE EE EE aE a a Ee 


370 DEFine PROCedure check (y$) 


380 LET flag = 0 


390 IF y$=" “THEN LET flag=1:RETurn 
400 IF yS(LEN(y$)) <> “_” THEN LET y$ = y$ & ” 
410 IF NOT y$(LEN(y$) - 1) INSTR "17345678" THEN LET flag 


= 1:RETurn 


420 IF LEN (y$) <> 5 THEN LET flag = 1:RETurn 


430 END DEFine check 


440 REMark SESE EEE SESE EE aE aE ot a ab a 


LISTING 2 


1000 LET prog$=“ ” :LET file$ =” ” 


1010 FOR n = 164068 TO 164072:LET prog$ = 


CHR$(PEEK(n)) 


1020 FOR n = 164073 TO 164077:LET file$ = 


CHR$(PEEK(n)) 


prog$ & 
file6 & 


1030 REMark FEE EE EE 
1040 DELETE prog$ & “temp_prog” 
1050 OPEN_NEW33, file$ & “file_1” 
1060 REMark FEE EEE PEE EEE EE 
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data will persist until you reset 
your QL. It willsurvive CLEAR 
and even NEW. 

Your main program will, 
however, need to convert the 
device data from its numeric 
form into string form. This is 
where Listing two comes into 
play. 

You will see that 1000 sets 
up two ‘null’ strings prog$ and 
file$,and that 1010 to 1020 loads | 
the character equivalents of the 
CODES from the System Vari- 
ables locations into those 
strings. This coding must ap- 
pear in your main program 
before you attempt to access 
any device. 


Flexible 


You can now easily and reli- 
ably issue statements such as 
those in 1040 to 1060. You have 
made your program flexible 
enough to cope with all the 
devices that your user may 
employ on his system. 

All of this relies upon those 
spare system variables being 
left unaffected by normal op- 
erations. If they get corrupted, 
your program will crash witha 
‘not found’ error from Qdos — 
and perhaps other unhappy 
things will occur. 

However, it all works in a 
pristine machine. Note that it 
may not work in the presence 
of various proprietary software 
such as toolkits. But then, you 
wouldn’t write a program for 
general use that depended on 
toolkits, would you? Better re- 
member to mention that in the 
Manual, though... 


Reading 


In reading this, is may have 
occurred to you that these 
mnemonic data could be 
tucked away in a short file on 
cartridge or disk, where they 
could be accessed by yourmain 
program without having toask 
the user to type them in every 
time he/she RUNS your pro- 
gram. 

Yes, I thought about that. I 
even coded it! 

And then — you are ahead 
of me? — I realised that my 
program would not know, 
unless itasked, where to READ 
the file from! 

What fools we mortals be! 
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Simon Goodwin finds existing file display 
commands lacking, and presents the fast, 
friendly DIY alternative — the MORE command. 


am always eager to hear of new com- 

mands that QL users wish to use on 

their machines. This project was sug- 

gested by local Quanta group Secre- 
tary Stuart Jones, who asked for a com- 
mand to display files as pages of textin a 
window, allowing movement back and 
forth. 

‘What, MORE?’, | said, relishing the 
| chance to write some dialogue, and think- 
| ing of the program of that name in Bell 
| Unix systems. MORE lets you look through 
| a file by pages or lines, showing your 

position in the file as you go along. Unix 
implementations often show the percent- 
age of the file that has yet to be displayed. 

There is little to choose between frac- 
tions and percentages, and sometimes 
exact information is useful; the DIY com- 
mand echoes the file name, size and 
current position, in bytes. You can enter a 
new position at any time, moving directly 
to a particular character of the file. 

ALT up-arrow and ALT down-arrow move 
back and forth a page at a time. | chose 
these key-strokes to be compatible with 
the PgUp and PgDn keys on PC-style 
keyboards, available for the QL and fitted 
on my Thor XVI. Down-arrow scrolls the 
screen, a line at atime. Itis much faster to 


move in pages. 

Of course, you could do all this, and far 
more, with a separate program like FEDIR, 
Spy or The Editor, but these are quite 
large tasks; they need the file in memory, 
plus indices, and may well use buffers 
outside the task as they run. 

QL MORE is a pages display command 
for SuperBasic, instantly available with- 
out disturbing the main memory, using the 
default or designated sub-directories and 
windows. As the whole thing is written in 
machine-code, it fits in just 1K of memory, 
and can be shared between any number 
of SuperBasic tasks. 


Copy to screen 


lf MORE is to be useful, it must be 
superior to the customary commands that 
display files: VIEW and COPY. Discus- 
sions with other QL users confirm that | 
am not alone in using COPY TO SCR to 
scan tasks and Psion Qui// documents. 

If you just want to know what is inside, it 
is much less disruptive to copy a DOC to 
SCR than it is to load Quill or Xchange. 
COPY can reveal the extensions in code 
files; you could even cheat at adventure 
games by looking through the code for 


commands and messages! 

The COPY command is built into every 
QL, with parameter handling extended by 
Toolkit 2. It opens two channels and cop- 
ies bytes from the first to the second until 
an error occurs, when it closes both chan- 
nels. 

The Toolkit extensions make the first 
parameter default to the DATA_USE sub- 
directory. SPL_USE gives a default for 
the second parameter. SPL_USE 
‘SCR_512X256a0x0' makes the default 
COPY device a big window, so COPY 
BOOT display the BOOT file on the full 
screen. !t also directs the SPL command 
to SCR, rather than the usual SER or 
PAR. You need QL Toolkit or Toolkit 2 to 
use these defaults. 

COPY FILE, SCR opens a window in the 
smallest character size for the MODE that 
you are using, and scrolls the bytes of 
FILE through that window. The colours, 
like the CSIZE, are fixed: green ink on 
black paper. You can over-ride the default 
window size by adding parameters after 
SCR; recent Argos systems let you specify 
a border at the same time. 

Assuming FILE is too long to fit the 
window, COPY scrolls text continuously 
unless you press CTRL-F5 to pause all 
display output, disrupting other tasks that 
want to use the screen. There is no way to 
move backwards in the file; once text has 
scrolled away, ithas gone and you cannot 
see it again unless you re-start the COPY 
from the start. 


MIN( BOFF_SIZB-TEXTBO¥, DEPTHAWIDTE | 
Number of bytes unscanned in buffer 

AG offset to first unscanned byte 
Buffer for 1@ numeric digits (1 hope} 
File point at top left of next page 
Space shared by file name. header ete 
LONG File length & start of file header 
dffset to Pile type byte in file header 
Offset to LONG data space in header 
Offset to nawe in file header 

From here on is file tert buffer space 


line+2 
waxtext+2 
textleft+2 
textptr+4 
digits#18 
top_lefte4 
filenase 
length+5 
length+6 
length+14 
length+4 


aaxtext equ 
textleft equ 
textptr equ 
digits equ 
top_left equ 
filename equ 
length equ 
filetype equ 
dataspace equ 
headname = equ 
textbuf equ 
t 
start lea.) define, al 
wove. $110\y, a2 
jap (a2) 


+ GL WORLD DEY TOOLKIT - MORE keyword 1.1 by Simon 8 Goodwin, May-June 1991 
‘ 


Replace BUF with A4 if you lack RQ08 
Channel ID of the text output window 
Channel ID of the proapt window {#8} 


buf equr ad 
output_id equr d5 
prompt_id equr qd? 
t 

4 Wames for variables in Buffer, addressed with WAME(BUF, A6.L) 
t 

vidth equ t) 

depth equ width+2 
old_top equ depth+2 
column equ old_top+4 
line equ column+2 


WIDTH of output window, in characters 
DEPTH of output window, in characters 
File point at top of previous page 
Loading COLUMN & LINE corrupts OLD_T0P 
with the width & height of 58 


Point at the details 
Use the BP.INIT vector 
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4 WORE [ § CHANNELS . ) PILE NAME beq.s opened Hurrab, it worked! Avoid next effort 
t ‘ 


wore woveq f1,di Assuae channel #1 4 Search out the DATADS default device prefix asong the systea variables 
lea. B{ad}, a4 + 
cmpa,] ad a5 Just one parameter? nove.! 8,43 Save the error code for later 
bai bad_param Reject unless there is one! noves 18, 40 WT. INF trap key 
beq.s channel trap 4] Find the Systee Variables 
eaxg advad Isolate the first parameter nove, ] 176 (a8), d8 D@=8 or points to the DATAD string 
gove.¥ $li2\w. a2 CA.STINT - get an integer beq. 5 tail_d3 No default so return report code in D3 
jer (add nove, } dO, a8 
boe bad_exit a pove.¥ fabl+,d8 Pick up the string length 
pove, | ab,a3 Start of next paraseter details bae.s default_ok If default is ovll, it won't help 
aove,} ad,ad End of supplied parameter info fail_d3 move. ] d3,d8 Returo error code from OPEW 
gove.¥ O{al,ab.1},d1 Grab the channel nuaber rts 
beq.s bad_paras Alas, #8 is already needed r] 
channel wove, } 48 (nb) ,d2 Find the channel table 4 Copy default to the buffer, append the parameter, and re-try OPEN 
nove. | O(a6,d2.1),d7 D7 is ID of channel 38 ‘ 
wily Hod) Find offset in table default_ok lea. filename( buf}, a3 
add, | d2.dl Add base to offset nove.¥ dé.dl Save length for total 
cep. 1 Hat a6) dd Check not beyond end subq.¥ #1,d0 
bge.s vhat_chan deft_copy aove.b (aBl+,2(ad,a6. 1) 
nove. | Olab,dl.}},a@ ID for output window addg, } 41,03 
wiodows = wove, | (a6), buf Find SuperBasic’s fixed BOPFER offset dbra a8, deft_copy 
nove.] —buf.al Optimise code if WIDTR=@ (expected) move.b «= Afa2,a6,1},d@ Recall the length byte 
t lea. 1 vidth{buf},al Generate this if WIDTH is changed! ext.¥ da 
moveg -1,d3 Wait forever if necessary add. da, dt Total length of the composite string 
bsr windows pec Read DEPTH & WIDTH of main window suba. 11,49 
bne.s bad_exit Windows only! Reject imposters slov_copy sove.b 1iad,a6 1}, 2ia3,a6. 1) 
wove. | a@,output_id Store ID for use later addq. 1 61,43 
aove. | prompt_id,a® Get busy in screen window #0 add. | #1, a2 
poveq 414,48 $D.CORE; turn on the cursor in 68 dbra 48, slow_copy 
bst call dos nove.y di, filename{buf, a6. 1) 
be. s bad_exit Ahem, something is terribly wrong! lea. 1 filename{ buf), a8 
lea, 1] colymo-4{buf},at Four words; MORE uses 3rd & 4th bars try_open Try to open file; oame is at (A, A6) 
ber windowspec ‘Read COLUMN & LINE for prompt window boe.s —bad_exit Had enough? Give up and complain! 
4 4 
‘Get the file oawe parameter as a string or 4 name 4 Pile is opea, Channel ID is in AB - read header & write proapts to 08 
4 ’ 
det_oame = tst.b Glad, as, 1) Is the value set? opened woveq 464,42 Buffer size 
bne.s value_set If so, use GTSTR to read it lea. 1 length(buf},al Read the file header 
povea.] 24/46), a8 AB -> SuperBasic Wame Table noveg §-1,43 Infinite timeout 
move, 2(a3,a6.1),d0 DO is index of parameter nage moveg 671,48 FS, AEADR 
Isl. 43,0 Scale for eight byte entries bsr do_trap4 Read file header 
adda, dB, ab Iwplicitly extends D8 to match Ag move. di,dé Save header length for later tests 
' nove.¥ 2(a8,a6.)),d8 DA is offset of text in Name List exg prompt_id,ad Swap from file to prompt channel ID 
ext. | do Data regs. need explicit extension bsr tidy_wind Clear space for file position 
add. 1 321 a6), d0 Add Name List base offset cap.¥ ¥64,d6 Was it serial header? 
move. | dB, ad Save total offset for later beq.s full_head Show file header details 
lea. | filename( buf), a3 st length(buf,a6.1) Mark the length as ‘enormous’ 
nove. | a3, ad Set name offset for OPER later bra.s find_rooa Skip the other messages 
woveq 49, d1 Clear high bytes of DJ full_head lea.] spacer, al 
aove. b B(a6,dB.1),d1 Bl is length of name (1, ,255) bsr print_abs Separate current position from size 
elr.b O{ad, a6. 1) Clear high byte of buffer word length nove] length{ buf, a6.1),d1 
copy_oaae move, b O{a6,d8.1), (lad, a6. 1) bsr print long Show total file size in bytes 
addq, | Ua Advance through buffer capi.b HI, filetype(buf,a6.1) Check Al is still OH 
addq. | Hi, de Advance through Naae List boe.s not _task 
dbra di,copy_name Copy D1+1 bytes including length lea. lbracket,al Bracket date space 
bra.s nawe_ready bsr print_abs 
‘ nove, | dataspace(buf,a6.1),d1 
vhat_chan soveq 4-640 CHANNEL NOT OPEN error bsr priot_long Show file data space in bytes 
bad_exit rks lea, 1 rbracket,al =... in brackets 
bad_param = soveq 6-15, d8 BAD PARAMETER error bsr print abs 
tts not_task lea. spacerd, al Yet more gratuitous ornamentation 
4 bsr priot_abs 
1 OPEN subroutine, tries to OPEN IN the name at Ag wove.y headnawe(buf,a6.1},d2 Pick up the file name length 
' lea] headnamer2(buf},al Point at the text 
try_open  soveq bi, dé Trap key for 10. OPER trap 4 Text address is AG relative 
noveq idl This task vill own the channel bsr print_str Priot file name from header 
aoveg #1,d3 Try to OPEN IN find_room move] Bla}, de Find end of buffer area 
trap ia Kemenber Ab sub. 1 buf, db Subtract start to get sise 
trap 12 noveg Stextbuf,dl Avoid slow LONG operand fetch 
tst.1 dg Set 2 flag if it worked sub] d1,d8 Leave room for buffer variables 
rts move.w = width{ buf, a6.1},d1 
1 nulu depti{ buf, a6.1),d1 
value set move. — $116\w, a2 CA.GTSIR - det a string cap.t al. d8 Is the window bigger than the buffer’ 
jst {a2} bls.s screeafuls © Expects <= 32K characters /screen! 
bne.s bad_exit move.) — d,d@ Ose al) the buffer space we have 
subg.w = 4,03 Only one wore paraneter, please screenfuls move.» dB, waxtext{buf, a6, 11 
bhe.s bed_paras elr,1 top_left{buf, a6.1) 
Jea,] lal), a2 Save offset of length byte none_left clriv textleft(buf, a6.1) Invalidate buffered text 
nove. ] al,ad Find the string start tas old_top( buf, a6. 1) Invalidate ‘last page’ 


| nene ready cap.w 6128-93-filename-2,0/a8, 26.1) Allow default & date ox a8,prompt_id That's enough proapting for now 
bpl.s bad_paras Name too long, reject it 
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710 


10@ REMark Sinclair QL World HEX LOADER v 3 Tan 


110 REMark by Marcus Jeffery & Simon N Goodwin 


CLS: RESTORE READ space: 
PRINT “Loading Hex...” 
INPUT “Save to file... 


SBYTES f$, start, byte 


“7 f£ 
STOP 


730 
740 


start=RESPR( space) 750 
HEX_LOAD start 


7608 
778 


DEFine FuNetion DECIMAL (x) 
RETurn CODE(h$(x})-48-74(hS(x)>"9"> 
END DEFine DECIMAL 


DEFine PROCedure HEX_LOAD(start) 


byte = @ 


REPeat load_hex_digits 
READ h$ 


IF hg="*" 


IF LEN(h$) MOD 2 


STOP 


END IF 


FOR bh = 


hb = DECIMAL{(b) 


checksum = @ 


1 TO LEN(h$) 


EXIT load_hex_digits 


PRINT“Odd number of hex digits in: 


STEP 2 
lb = DECIMAL{b+1) 


IF hb<®@ OR hboid OR 1b<@ OR Lbhold 


PRINT" Tilegal hex digit in- 


END IF 


“Shs 


POKE start+byte, 164+hb+Lbh 


checksum = checksum + 


byte = byte + J 


END FOR b 
END REPeat load_hex_digits 
READ check 
IF cheek <> checksum 


PRINT"Checksum lucorrect 


A END IF 


PRINT Checksum correct, 


END DEFine HEX LUAT 


lfh4hb + lb 


Kecheeck slate 


data entered at 


2 REMark Space requirements for the machine 
DATA 1422 


REMark Machine code data 
"A3PAQ3EC34786110", * 
“ BBCC6BQOOO9 46716" 
“§60OGO84264D2A4C" 
"OPIDZEZE2ZBOOC2EC", 
“60622076 18802856" 
“865424082047 700E” 
"90046 19GO3 1A4A33", 
“3@33E8@2E748DOCo™, * 
"“QO202 4494 7ECOO22", 
‘4233E80017B6O0BO0" "© 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
710 DATA 


’ 


4ED27 201 49EBOOV6 " 
, "CB4C3478@1124E92" 
"323 1E800677A242E" 
“Q@O28D28 2B2AE0034" 
" 224C76FF6 1000338" 
"61000328664843EC" 
“EBQO664E206EGO18" 
3O30E802 48CODOAE” 
*204B7 200 12360800" 
E801528B526851C9" 


780 
798 
BaD 
#10 
B28 
832 
840 
850 
aB@ 
87 
BaD 
fate”) 
308 
918 
929 
930 
948 
958 
960 
972 
980 
998 
1088 
1012 
1P20 
1832 
1842 
1052 
1062 
1070 
1980 
1f9a 
1188 
1118 
1120 
1138 
1148 
1158 
1168 
1178 
1182 
1198 
1200 
12128 
1220 
1230 
1248 
1z5o 
i260 


DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
LATA 
DATA 
DATA 
DATA 
DATA 
DATA 


“4233K80017RR08008"- 
“FFF 46@2870FA4E75", 
"760148 444E424A89", ” 
“66E4534366E245E9 ©. 
“EBQOOGAD4G 1D6674C"." 


“PDBWE 7 O62ABW4AG3G1B~. ” 
"@92 2320053491798", 
“1O93ZE8OS4B80D240", “ 
“SZBBS28A51C8FFFA". 
“6 18A6682744043EC". 
“O2583CG1CF8H6 10H" 
“SOF 4RB22604643FA". 
“E8226 10001D49C34" 
"92886 18002122234". 
“62746 190B20243FA" 
“EB3043EC00324E44", 
“988C7 22690813234". " 
“63IO220O139BORBOC",” 
“ 4AF4E6@4CFE8CB88" 
"E8@23C34E8203234" ." 
"7@GA53416B36B031", 
“62FO4A416790ABO3 1". 
“AC34E8OOB534462DA". 
“EBORS 180019082989", “ 
“B1MOG1E23434E80C", " 
“7O036 19001 5C6 706" 
“E8GE6 7AC6S96 2490". 
“7 20070434E433434", 
“CF886 10001342204", ” 
" 44806 BOG B23C001B" 
“2047 700F 4E497 204", " 
“PAUDBBBOCBBR4EB 22" 
“BE3COGD9662629B4" . 
"BBR4EB226600FF 10". ” 
“&E43CF886 1DAAGLA" . 
“66284AB4EB 1 E6610", * 
"“P2WO6AD6CFB86GB 4" , 
“MIMAABOBBBCZ 2204", " 
“CF88617C6 1800092". * 
“BI7EBBBES3416F0A", " 
“67P42234E8 1 E76FF",” 
“4E43CFB822046982".” 
"“FEIADTABAEB4ACT AAI” , 
“BOFCAORAAIBAD3 2A", ” 
“484 1C34906900030" -" 
“FFD843F 420154442", 
“6S LIG43FABD5A3419"." 
“4E444E434A804E75" 
"7D Q6GEECBB82274", ~ 
"34817 2Q076001631",~ 
“Be LBAABIDG3O65 12>." 
“D2Z83534266EO7 000", ” 
“ZB2DZB2O202G20 20" . 
“PDO2 207 BOD 17 DOB” . 
“FCLAG44D4F 524590". 


“#" 87470 


Bi B 3 a 


“TDR 14E7 870017 2FF * 


4£75347801164E92" 


“GOO 129490C7B093B" 


260070004E41 2028" 


66042003 4E/547EC" 


“E8@2526B51CGFFFS" 


534017B2E8@1E802" 


"398 1ES82241ECOO22~ 
“QA2276FF 79476100" 
» ‘O2Z38BC%COD4G6 76 * 
"O2926 10002242234" 
. “OOA1KH27661843FA" 
“E8286 10001BC43FA" 
“@2706 18061FA3434" 
610001 EE282EOOOK " 


EBAOC2F 4E802B03 1" 
42B4E8 1K4274EB0K" 


"7O204E43CB88 3834" 


E8@E67 4822748818" 


“E8005 28967125346" 
"EB00650452895341" 
“240994B4E8 109574" 


£8 146034343 4K68K" 
43ECOO0262989E8 10 


, PCOPOOF 666053981" 


6 19900322002 4E75" 


“ESGE480292822801" 


6 LAWBOCE7TAGD14E 43" 
“66 12CF887002 4E42" 
BOBAPGOBBCFABRZ3C' 
“BULB TRALBOOOFES 4" 
"ES LEEA@42984E81E" 
7200298 LEB LE?A42~ 
“6QAGPEFRZBE3CORL) 1" 
2234E8 22048 10000" 
“2234E8G046AC00484" 
BOCABZICOOBABBE 
T4BQA43ECOB147002" 
43ECO0146 1000092" 
280170144 43700K" 
47ECOO1 4448 16626" 
“7200484167 243081" 
4B 41 BEF CODA I" 
178Q@R6O9538BH1CA" 
“PHA 2AOOILE 4 46006 © 
7007 4E434E75700R " 
“3434E8QA3234E608" 
E8106 1DO8CB8S4E7h" 
E6005269B65 3COW39 ” 
D2B12OO1LESS1D28e" 
4E7 57 ORF 4E7 SOQ0A” 
“2D 200004206 F 6620" 
“OBO 4 206 GBELAOAG 1” 
"“PPBBIABOBABA * 


COPY has other weaknesses; it does 
not reveal what proportion of the file has 
been viewed, or the size of the file. It does 
not clear its window, so copied text can 
get muddled with other windows, or out- 
put from previous COPY commands. 

COPY is a general-purpose command, 
designed to work with all devices, so it is 
not ideal for looking at files. However it 
does get used for that purpose, because 
it is always available and gets results 
quickly. 

Tony Tebby’s VIEW command surfaced 
in Sinclair's QL Toolkit, and later in Care 
Electronics’ SuperToolkit 2 and many disk 
systems. The manual says ‘VIEW is a 
procedure intended to allow a file to be 
examined in a window’; in fact it is a way 
of reading Ascii files of short lines. 

VIEW takes one or two parameters — a 
file name or string, and an optional chan- 
nel number. By default output is to chan- 
nel #1, but you can specify a device or any 
other open channel instead. VIEW #2, 
TEST displays the file TEST in the listing 
window. 

VIEW is superior to COPY in that it can 


use existing SuperBasic windows, de- 
faulting to #1 , like most display commands. 
Long lines do not wrap onto several dis- 
play lines; instead VIEW truncates each 
file line to fit the window, showing only the 
start of long lines. 

VIEW pauses each time the window has 
been filled with new ‘page’ of text. You do 
not have to press CTRL-F5 as the pro- 
gram does it for you, locking the display till 
a key is pressed. Each page appears a 
line at a time from the bottom. If the 
window has many lines this scrolling limits 


No markers 


the rate of text output. 

VIEW works well with narrow Ascii files, 
like most assembler source and 
SuperBasic listings, butitis hopeless with 
tasks, binary data and Quil/ DOC files, as 
it tries to read a line at a time; such files do 
not have ‘line end’ markers! 

VIEW is only suitable for files of lines, 
and you need a wide window to see all of 
each line. As with COPY, there is no way 
to move backwards, orto determine where 


you are in the file, and the CTRL-F5 pause 
contro! disturbs other tasks needlessly. 
MORE fixes all these problems, and that’s 
not all. 

The simplest form of the command is 
MORE THING, where THING is the name 
of a file in the data sub-directory. The file 
may be identified by a string, string ex- 
pression, or unset name. The default win- 
dow is #1 but you can over-ride that with 
an explicit channel number. The output 
channel must be a window. 

The parameters of MORE are like those 
of VIEW, although the output channel is 
expected to be open. VIEW & SCR, THING 
copies file THING from he default data 
directory to a temporary SCR channel. To 
do this with MORE, you need OPEN #3, 
SCR : MORE #3, TEMP : CLOSE #3. 

You could supply the name in full, like 
N1_RAM2_THING. If the name is not 
recognised immediately MORE adds the 
DATA_USE default and tries again. You 
don't have to specify the full path in sys- 
tems that use sub-directories, like the 
Thor and Miracle hard disks, Gold Card 
and the upgraded Atari ST Qdos Emula- 
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tor. The code is re-entrant, using no variables cost £7 on disk or your cartridge, from DIY 
MORE implicitly uses channel #0 to dis- beyond the current task, so it can be used Toolkit, Cwm Gwen Hall, Pencader, Dyfed, 
play prompts and read controlkeys,soyou by several tasks at once. It dynamically Cymru SA39 9HA. 
cannot direct output to #0. The prompt adjusts to the space available in SuperBa- | The main assembler source listing has 
window must allow input. It has an active _sic’s buffer, reading large or small chunks been divided into two sections. The first 
cursor, SO you Can easily switch to and from the file accordingly. Even if the buffer part appears this month, along with the hex 
from MORE while multi-tasking other pro- is small, the QL slave-blocks make access _ loader for the entire code file. You can use 
grams. fast once the data has been found for the the hex loader to create a working copy of 
The prompt line starts with the current first time. the MORE command. In my next DIY Toolkit 
position in the file: anumberbetween0,the |= The main windowdisplay runs atthe best column! shall present the remainder of the 
Start, and the length of the file in bytes, speed possible. Several lines, or even the assembler source code, and explain how it 
which comes next. Both values match when whole window, canbe printedasone string, works. 
the last page of the file is on display. The avoiding the overhead of Qdos calls for 
difference is the number of bytes ‘below’ every line or character. : 
the last time displayed. QL display output, measured in charac- Adding MORE 
It can be useful to spot task files when ters per second, is fastest if the main win- 
snooping around, so MORE shows the dowused CSIZE 1,0 and the leftmost pixel Listing Two is a simple Basic loader 
data space value stored in the file header x co-ordinate in the window is evenly divis- which reads the machine-code from DATA 
if you use it to look into a task. The last part ible by 8. This is the default for SCR, CON _ statements and stores it in a file. Lines 100 
of the prompt line is the name, againtaken and QL (F2) TV windows; (F1) monitor to 580 are the same for each DIY Toolkit 
from the file header: windows are faster without the ornamental project. Once you have created the code 
borders of Sinclair and CST; remove these file, these commands will add MORE to 
853 of 65536 (8192) in DIY_Task with BORDER0;BORDER#0,0:BORDER your system: 
#2,0. 
The example indicates that the 64K file | MORE needs two windows; one mustbe X=RESPR (1024) 
DIY_Task uses 8K of data space, and 853 CON-type, the other may be SCRor CON, LBYTES “filename”, X 
characters have been displayed. Once the or networked equivalents. Input can come CALL X 
first page has appeared you can move from any file, or devices that support ‘ran- 
through the file with keyboard controls. dom access’ system calls; this includes _ Listing one shows how MORE checks 
When you have finished press ESC, or microdrives, ram disks, floppy and hard its parameters and generates the prompt 
CTRL SPACE in task 0,0, to stop MORE drives, as well as DIY Toolkit’s MEM de- message. This program is more compli- 
and close the file. vice. cated than most DIY Toolkit routines, and 
PgDn or ALT down-arrow displays the Ifthe MEMdevice-driverisloaded, MORE | have used some extra assembly-code 
next page. If you carry on at the end of the MEM displays the first page of system features to keep the complexity under 
file MORE wraps back to the start. Down- memory. You can view any address. Type control. The code starts by declaring regis- 
arrow alone scrolls one more line onto the ENTER49152ENTERtoviewthememory ter and constant EQUates; these are 
display. This is slower, but may be prefer- contents atthe startofthe Romport.OPEN symbolic names used to make the pro- 
able if important text spans a page bound- #3, MEM9_80p : PRINT #3, “Hello QL grameasiertoread,understandand modify. 
ary. World” : CLOSE #3 creates a permanent The names BUF, OUTPUT_ID and 
You can move directly to any position in buffer called MEM9, withamessage inside; PROMPT_ID correspond to 68008 regis- 
the file by pressing ENTER, typing the MORE MEM9 displays the contents. ter names. If your assembler does not 
position, and ENTER again. The file willbe | At around 1K, MORE is a fat cat among allow EQUR you need to replace the sym- 
displayed from the specified point; the first DIY Toolkit routines, and calls Qdos liter-_ bolic names with A4, D5 and D7 respec- 
line will be incomplete unless the position ally dozens of times in each run. Unusually, _ tively. 
chosen is at the start of the line. it is more than just a building-block. You The main block of equates defines offsets 
If you type nonsense, or more than nine can customise MORE to suite your own in the SuperBasic BUFFER area, used to 
digits, the display is re-drawn atthe current system, usingitalone orin conjunction with store internal variables as the command is 
position. ENTER ENTER is a quick way to other commands. executed, and text en route from the file to 
restore the display if ithas been obscured ‘The code could be optimised by register the display. 
by another task. changes, branch and subroutine  Allthe variables are addressed relative to 
sequencing to save bytes, but ithas been BUF, whichis the offset of the buffer inside 
written to facilitate continuous develop- SuperBasic. This is initially 128 bytes long, 
Backwards ment and customisation; | have not and grows to fit long program lines. BUF 
squashed the code to the minimum, be- comes immediately after Basic’s system 
cause that would complicate further addi- variables, so its start does not move rela- 
ALT up-arrow or PgUp move backwards _ tions or changes. tive to A6, the base address of Basic. 
through the file. If you are at the start, it Users can easily change the command The 68008 instruction set makes it easy 
takes to you 512 bytes from the end of file, name,messages, orstepsizes,perhapsto to read and store values at addresses 
and displays from there. This quick route to overlap pages or suit favourite windows. indicated by two registers and a small 
the end of the file can be useful;forinstance Budding 68000 programmers might add offset. This addressing mode is ideal for 
it reveals the names of extensions used by code to indent long lines, alter the wrap- access to tables inside Basic tasks — for 
Supercharge and Turbo compiled tasks. around, and clear windows before or after instance, MOVE.W DEPTH (BUF,A6.L), 
If you have just moved down a page, use. Many extra controls and options are D2reads into D2 the word at offset DEPTH 
PgUp will move back to the previous page. possible: how about allowing negative in BUF in SuperBasic. 
If you want to go further ALT up-arrow and entries to move any specified number of | Each offset in BUF is worked out from the 
PgUp hop back in steps of 2048 bytes from bytes backwards in a file? one before, so you can infer the size of 
the current position. The values 512 and = Theoptionsareendless, withcommented each area from the offset to the next one. 
2048 are chosen by experiment; ideal source available from DIY Toolkit. Please Some areas are shared: for instance the 
settings are a matter of taste and window ask fro Volume V forfile Viewing (the name space from FILENAME onwards is used to 
dimensions. They are stored as literallong Volume M is already used for MultiBasic). store the filename and the file header; later 
words in the code file, and could easily be Volume V includes the source and object most of the file header space is used to 
patched or re-assembled todifferentvalues. code for MORE and Quiffdocumentation. It store file text, at TEXTBUF. The calls to 
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read WIDTH and DEPTH, or COLUMN 
and LINE, also store values in OLD_TOP, 
but these are not used and get overwritten 
later. 

The routine labelled START is only used 
when you CALL the code file. It passes the 
name and address of MORE to SuperBasic. 
The value $110\w indicates a word vector; 
other assemblers expect $110 or $110.w. 

The next routine implements the MORE 
command. Ifthere is more than one param- 
eter it fetches an integer with CA.GTINTI 
otherwise it assumes #1. It picks up the ID 
of channel #0 as it reads the output window 
ID from the channel table. 

The block labelled WINDOWS checks 
these IDs by turning onthe cursor in channel 
#0 and reading the size of the output win- 
dow with SD.CHENQ. These operations 
only work on display channels; other de- 
vices give a ‘bad parameter; error. 

From GET_NAME onwards the code as- 
sembles the file name. TRY_OPEN is a 
subroutine used to open the input file. 
MORE makes two attempts to open the 
file; first it passes the literal parameter 
value; if that fails it looks at offset 176 in the 
System variables for a pointer to the data 
default directory string. 

This variable, SV.DATAD, is zero on 
standard QL systems. Toolkits and disk 
roms setit to the address of the default data 
directory string. It consists of up to 33 


character, including an underscore at the 
end; it is set with DATA_USE and dis- 
played with DLIST or PRINT DATAD$. 

lf the parameter has no value MORE 
picks up the text from the Name List, like 
MultiBasic, in QL World March and July 
1990. This means that you do not have to 
putthe name in quotes unless it has a value 
in your program. CA.GTSTR is used to 
fetch the value of quoted strings, variables 
or expressions. 

We arrive at OPENED if the file name is 
accepted. The next step is to print the 
prompt message in channel #0. The file 
size, task data space and name are all read 
with FS.HEADR. If the file header is not the 
expected size MORE assumes a MEM or 
other serial channel and skips the details, 
setting the notional ‘length; to a few billion. 


Variables 


At FIND_ ROOM the code works out the 
size of the BUF area, allowing space for the 
variables at the start. The value in 
MAXTEXT is the number of bytes to be 
read from file each time. MORE is de- 
signed to work a screen at a time, so it 
reads no more than the number of charac- 
ters that would fill the output window, cal- 
culated by multiplying DEPTH and WIDTH. 
The QL ‘slave block’ buffers further re- 


duce the need for device access, so MORE 
goes at healthy speed, even if the buffer is 
small or you run it from microdrives. If you 
want pages to appear all at once you can 
expand BUF by entering or loading along 
line of SuperBasic; the easy way is to 
PRINT “REM “ & FILL$ ("*",2000) to a file 
and MERGE it. 

Source for the PRINT_ subroutines will 
appear in my next DIY Toolkit coloumn, 
which will explain file input, keyboard con- 
trol and display output. The next listing 
includes useful routines to read and write 
32-bit long interger values, avoiding the 
slow and complicated floating point con- 
version shat would be needed to use Qdos 
Rom Code. MORE can display file posi- 
tions up to 4,294,967,295 - the limit of 
Qdos random access files. 
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SPEEDSORT 


sorts per second! 
Machine Code £20.00 


PLANNER 


Machine Code £10.00 
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All Programs for 768K Ex 


The ultimate sorter! Sorts arrays of any size by given 
element number. The speed is devastating — up to 80,000 


Qne of the most useful programs you could wish for. It will provide a printout of 
dates, with day and week numbers, in a month-per-page format from a given 
starting date and number of forward days, It also includes routines for finding 

day and week numbers you can use in your own programs, 


SCREENMASTER 


Screenmaster will record anything currently on screen in a 
‘squeezed’ form, and reproduce the picture in a variety of 


cinematographic-style wipes and speeds. 
Machine Code £20.00 


ALL PROGRAMS SUPPLIED ON TOP-QUALITY 3'/2INCH DISKS — POSTAGE & PACKING FREE 


QL Disk Library allows the user to catalogue up to 3000 
program titles (around 75 disks at a time) in alphabetical order 
and cross-referenced by numbers given to the disks, No more 
searching for endless hours for that lost program. 


Tranquil converts Quill documents into BASIC PRINT 
statement form in order that they can be more easily 
manipulated for printing and adding printer instructions etc. 


panded QL with Trumpcard 


QLDL 


Machine Code £15.00 


TRANQUIL 


Machine Code £10.00 
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In the third part, 
Tom Ashcroft 
looks at loops 
and selections. 


o far we have looked at information 

retrieval mainly from the point of 

view of locating and displaying 

individual records in the database, 
but much of the value of computer 
databases lies in their ability to extract and 
collate information from many records. 
This power is most effectively realised by 
programming the database, and a later 
article in this series will consider program- 
ming in more detail. A fairly simple func- 
tion, however, which most commercial 
packages have available from the key- 
board, is the ability to make a selection 
from records in a database according to 
some specified feature or features. For 
example, a mail order firm might want to 
select all its customers living in Bristol to 
receive some promotional literature, and 
among those customers it might want to 
choose particularly, say, men aged less 
than 40. 


Selection loop 


To program this in DBQL is fairly simple 
and needs a loop to examine the appropri- 
ate field of each record in turn and select 
those which match with the given selection 
criterion. We have to decide whether to 
select-in those which match or select-out 
those which do not match, but if repeated 
selections are to be carried out with differ- 
ent criteria, it is better to flag the records 
that fail to match rather than those that do, 
so that selected records are left unflagged 
and available for later selection. The flag 
will be a letter S placed as the second 
character of field 0 of a non-matching 
record. (The first character place is re- 
served for the D deletion flag.) See listing 
twenty two. 

The procedure first displays a list of field 
names and numbers and requests the 
number of the field to be matched using 
the new function, GETNUMBERS$, de- 
tailed later, which ensures that only nu- 
meric characters are accepted. 

Line 2610 requests the item for selection 
and the counter variable, selected, is set 
to 0. The loop in 2630 to 2690 examines 
the appropriate field of each record in the 
database and if the selection item is iden- 
tified in the field the counter is incremented, 
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Listing twenty two 


DBQL 


2540 REMark OCA SELECT 


2550 DEFine PROCedure se 


2560 CLS:FOR j=l TO fields:PRINT j,a$(0,j,4 TO 


LEN(a$(0,j))) 


2580 PRINT"Enter field number "; 
2590 fldno$=getnumber$(1,fields) 


2600 fldno =fldno$ 


2610 INPUT"Enter selection item ";selct$ 


2620 selected=0 
2630 FOR j=1 TO nn 
2640 
a$(j,0,2)<>"S" THEN 
2650 
2660 
2670 
2680 END IF 

2690 END FOR j 

2700 PRINT selected;" 
2705 IF 


ELSE 


IF selct$ INSTR a$(j,fldno) 


AND 


selected=selected+l 


a$(j,0)=a$(j,0,1)&"S" 


records selected" 
NOT selected THEN RETurn 


2710 INPUT"Enter S to save selected records to 


microdrive"\" 
ENTER to return to menu 


L to list them on screen"\"Press 
t 
34$ 


2720 IF q$="S" OR q$="s" THEN 


2730 
2740 
2750 
chars: PRINT#6,0 

2760 FOR j=0 TO nn 
2770 
2780 
2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
BEEN 
2920 
c=k:b_s_ display 
2930 END DEFine li 


OPEN_NEW#6, 


END IF 


END DEFine se 


selected=0 
CLS: PRINT\ 
END DEFine des 


DEFine PROCedure li 


MADE": RETurn 


provided the record is not already flagged, 
but the record itself is left unchanged. Ifa 
record does not match, the flag S is in- 
serted in field 0. 

After the loop the procedure prints the 
number of matching records, ie the value 
of selected. To make a further selection 
ona different field, the procedure is called 
again and this time counts only matching 
records not already carrying a flag, so that 
only records matching both criteria re- 
main unflagged. A third selection would 


INPUT “Enter file name ";subfile$ 
"mdvl_ "&subfile$ 
PRINT#6,selected:PRINT#E6, 


fields: PRINT#6, 


IF a$(j,0,2)="S" THEN NEXT j 
FOR k=O TO fields:PRINT#6,a${(j,k) 
END FOR j:CLOSE#6 

IF q$="1" OR q$="L" THEN li 


REMark 300K RAKE DESELECT 
DEFine PROCedure des 

FOR j=l TO nn:a$(j,0,2)=" " 

"Selection cancelled" 

REMark *###RKKKKKAKKKKKKKKKKKEKKAKAKHEAKKKEK LT ST 


IF NOT selected THEN PRINT \"NO SELECTION HAS 


CLS: FOR k=1 TO nn:IF a${k,0,2)<>"S" THEN 


leave only those satisfying all three crite- 
ria, and so on. At each stage the number 
of matching records is displayed. 
Having made a selection in this way, 
what do we do with it? That will really 
depend on the needs of the database 
application but possibilities we could pro- 
vide for are to display the selected records 
or to save them to microdrive as a sepa- 
rate subfile. Line 2710 offers these two 
options. Pressing ENTER alone at this 
point will terminate the procedure, while 
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entering S will cause the selected records 
to be written to a microdrive file. Option L 
calls a new procedure, List, which can 
also be called from the keyboard, and 
usesthe B_S DISPLAY procedure to print 
selected records to screen. 

Some commercial databases have an 
arrangement whereby the database be- 
haves as if it were composed only of the 
selected records and the remaining 
records no longer exist. This can be par- 
tially achieved by inserting the following 
line in the DISPLAY procedure 


3015 IF a$ (c,0,2)="S" THEN RETurn 


so that only records without a selection 
flag will be displayed. 

Another way would be to copy unflagged 
records to a separate array in memory 
and handle it as a separate file but this is 
not possible at present in DBQL, though it 
will become possible after the next article 
in the series when multiple file facilities 
are added. 

Astute readers will have realised that 
last month’s binary search provides a 
selection function of a sort, but it is appli- 
cable only to indexed fields and does not 
support multiple selections. Multiple se- 
lections would require reindexing of the 
selected records at each stage and this 
would probably cancel out the speed ad- 
vantage of the binary search. 

Having completed a selection proce- 
dure, the flags must be cancelled before 
an entirely new selection can be run and 
the procedure DESelect does this by set- 
ting the flag character to a blank in each 
record throughout the file. The flag, se- 
lected is set to 0. Itis desirable to deselect 
the records before saving the file, other- 
wise the selection will still be in force when 
the file is reloaded. 

Inputs in DBQL have so far been entirely 
open and no doubt users will have en- 
countered error messages through acci- 
dentally entering inappropriate charac- 
ters, for example entering a letter or punc- 
tuation mark when a number is called for. 
We shall now look at ways of error-proof- 
ing the program so that inappropriate 
entries are rejected. 

There are three kinds of information we 
can store in a database viz characters 
(anything made up of letters or symbols), 
numbers and dates. As previously men- 
tioned, all data are stored as strings and 
numeric characters are converted to real 
numbers only when required for calcula- 
tion, Character entries have to be com- 
pletely free to contain any printable char- 
acter and little validation is possible, ex- 
cept to ensure that capital or small letters 
are used where this is essential. Four 
defined functions will now be described 
which check input of numbers and dates. 

INTAKE is a defined function called 
when input of a number is required. It will 
accept numeric characters but rejects 
letters and most symbols by printing its 
own error message and waiting for the 
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user to try again. The only non-numeric 
characters allowed are a leading minus 
sign andasingle decimal point. See listing 
twenty-three. 


Listing twenty-three 


5050 
5060 
5070 
5080 
5090 
5100 
5110 
5120 


LOCal j 
REPeat getstr 


FOR j=l TO LEN(a$) 


5100 and 5140 are simply to cancel the 
effect of the print ‘follow-on’ semicolons in 
5090 and 5150 and avoid disruption of the 
screen display at the calling source. 


REMark ¥*¥*XRKKEKKKEKKKKEK INTAKE$ 
DEFine FuNction intake$ 


wrong=0:decimal=0: INPUT q$; 
IF q$="" THEN PRINT:RETurn q$ 


wrong=wrongt(q$(j)<"0")+(q$(j)>"9")-(a$(j)=".” 


AND decimal=0) -{q$(j)="-" AND 
j=1):decimal=decimal+(q$(j)=".") 


5130 
5140 
5150 
5160 
5170 
5180 


END FOR j 


END REPeat getstr 
RETurn q$ 
END DEFine intake 


Listing twenty-four 


5510 
5520 
5530 
5540 
5550 
5560 
5570 
5580 
5590 
5600 


LOCal q$,q 
REPeat getvalue 


PRINT “Invalid entry 
END REPeat getvalue 
q$=q:RETurn q$ 


The whole function is enclosed in a 
repeat loop, getstr. After the variable, 
wrong, has been set to 0 and the number 
has been entered as a string in 5090, the 
program checks for an empty string 
(caused by pressing ENTER alone) andif 
this is found, returns the empty string. 
Otherwise a FOR — ENDFOR loop is 
entered which checks each character in 
q$ by means of logic statements which 
increment the value of wrong if the char- 
acter is not a numeric character. (The QL 
is actually checking the Ascii code of the 
character rather than the value of the 
numeric character, see QL User Guide 
Concepts pp 5-9.) The presence of a 
minus sign therefore initially increments 
wrong but this is decremented again by a 
later statement if the minus sign is the first 
character in the string. A decimal point is 
dealt with in a similar way but also sets a 
flag decimal so that any subsequent 
decimal point coming later in the number 
will leave wrong incremented. If, at the 
end of the loop, wrong has not been 
incremented and still has a value of 0, 
then no unacceptable characters are 
present, 5140 exits the loop and 5170 
returns q$ to the calling source as a valid 
number. lf wrong is not 0 then 5150 prints 
an error message ‘Numbers only’ and the 
loop returns to the input statement for 
another try. The PRINT statements in 


END DEFine getnumber$ 


w 


IF NOT wrong THEN PRINT:EXIT getstr 
PRINT\"Enter number only: "3; 


REMark oC RRR GETNUMBER$ 
DEFine FuNction getnumber$(lo,hi) 


qa$=intake$:IF ag$="" THEN q$="0" 
q=INT(q$):IF q>=lo AND q<=hi THEN EXIT getvalue 
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INTAKE$ alone is sufficient protection 
when entering numbers into a data field 
but in some other situations further local 
tailoring of the input is needed, for exam- 
ple, when choosing the field number at 
the beginning of the SElect procedure 
above. Here only a positive integer be- 
tween 1 and fields will do. A similar situ- 
ation arises in other parts of the program 
and it is worth while writing a defined 
function to deal with it, such as 
GETNUMBERSS$ (listing twenty-four). . 

In this function a repeat loop, getfield, 
first calls INTAKE$ to obtain an input. If an 
empty string is input a value of 0 is given 
to q$. Then the integer of the input is | 
taken, which eliminates any fractions, and 
finally a check is made that the input lies 
within the specified range, passed by the 
calling source as the variables lo and hi. If 
the conditions are met the loop is exited 
but otherwise a message is printed and 
the loop returns to the beginning, for a 
new input. 

Dates are sometimes used in calcula- 
tions and are better stored as numbers eg 
25 12 90 rather than 25 Dec 90. In prac- 
tice a six-digit numeric string will be used, 
in which the first pair of characters hold 
the day, the second pair the month and 
the third pair the year: DDMMYY. After 
the year 1999 the full year number will be 
needed, but that is some time away yet! 
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Listing twenty-five 

5190 REMark *¥*#X*********KKEX CHECKDATE 
5200.DEFine FuNction checkdate$ 

5210 LOCal j 

5220 REPeat getdate 

5230 wrong=0 

5240 INPUT "{DDMMYY)";q$; 

5250 IF q$="" THEN PRINT:RETurn "000000" 

5260 wrong=wrong+(LEN(q$)<>6) 

5270 FOR j=1 TO 

LEN(q$) :wrong=wrongt(q$(j)<"0")+(q$(j)>"9") 

5280 IF wrong THEN PRINT" Invalid date ";:NEXT 
getdate 

5290 wrong=wrong+(q$(3 TO 4)<"01")+(q$(3 TO 
4)>12)+(g$(1 TO 2)>31)+(q$(1 TO 2)<1)+(q$(1 TO 
2)>30 AND (q$(3 TO 4)=9 OR q$(3 TO 4)=4 OR q$(3 TO 
4)=6 OR q$(3 TO 4)=11))+(q$(1 TO 2)>28 AND qa$(3 TO 
4)=2 AND (q$( 5 TO 6))/4<>INT(((q$(5 TO 
6))/4)))+(q$(1 TO 2)>29 AND q$(3 TO 4)=2 AND (q$(5 
TO 6))/4=INT((q$(5 TO 6))/4)) 

5300 IF NOT wrong THEN PRINT:EXIT getdate 

5310 PRINT" Invalid date "; 

5320 END REPeat getdate 

5330 RETurn q$ 

5340 END DEFine checkdate$ 


Listing twenty-six 


5350 REMark ¥***#*R*RKKKKEKKKKKKKKKK KK UPPER$ 
5360 DEFine FuNction upper$({x$) 

5370 LOCal j 

5380 FOR j=1 TO LEN(x$) 

5390 IF CODE(x$(j))>96 AND CODE(x$(j))<123 THEN 
x$(j )=CHR$(CODE(x$(j)) -32) 

5400 END FOR j 

5410 RETurn x$ 

5420 END DEFine upper$ 

5430 REMark *¥***®*KKKKKKEKKKKKKKKKKKKK LOWER$ 
5440 DEFine FuNction lower$(x$) 

5450 LOCal j 

5460 FOR j=1 TO LEN(x$) 

5470 IF CODE(x$(j))>64 AND CODE(x$(j))<91 THEN 
x$(j)= CHR$(CODE(x$(j)) +32) 

5480 END FOR j 

5490 RETurn x$ 

5500 END DEFine lower$ 


Listing twenty-seven 

2330 CLS#4: PRINT#4,"Enter field names in order, up 
to 8 characters in length."\"Enter Shift/ESC to 
quits" 

2335 PRINT" 
or Date" 
2340 REPeat fname 

2350 INPUT \fields+1;" : "; field$; 

2360 IF field$="©" THEN EXIT fname 

2362 REPeat chektype 

2364 INPUT TO 28;type$;:type$=upper$(type$(1)) 
2366 IF type$ INSTR "CND" THEN PRINT: EXIT chektype 
2367 PRINT" Invalid type. Only C,N or D "; 

2368 END REPeat chektype 

2370 IF LEN(field$)>8 THEN field$=field$(1 TO 8) 
2372 field$=type$&field$ 

2390 x$=x$&field$&",":fields=fieldstl 

2400 END REPeat fname 

2410 PRINT\"How many characters in the longest 
field? ":chars=intake$ 

2420 IF chars<1ll THEN chars=i11 


Field name Character, Number 
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There is no need to store separators, 
which are only required for clarity when 
printed. Dates are entered via the defined 
function CHECKDATES$ (listing twenty- 
five). 

CHECKDATE$ operates on the same 
principle as INTAKE§, using logic state- 
ments to increment the variable, wrong, 
when an erroneous condition is found. 
The repeat loop, getdate, first obtains an 
input and if an empty string is input this is 
returned as a default. Lines 5260 and 
5270 check that the string consists of six 
numeric characters, and if wrong has been 
incremented at this stage 5280 prints an 
error message and goes back to the input. 


With care 


Line 5290 checks that the string is a 
valid date. The line is complicated and 
must be typed with great care since even 
a single mistaken character will cause 
malfunctions, which are sometimes quite 
bizarre. It contains a series of logic state- 
ments linked by “+" signs, each statement 
enclosed within brackets. In order as 
printed, the statements increment wrong 
for the following errors: month less than 1; 
month more than 12; day more than 31: 
day less than 1; day more than 30 in 
month 9,4,6 or 11; day more than 28 in 
month 2 when year is not exactly divisible 
by 4; day more than 29 in month 2 when 
year is divisible by 4. 

If none of these conditions is true, wrong 
will remain at 0 and 5300 will exit the loop, 
otherwise an error message and a return 
to the input stage will follow. 


Into caps 


The defined function UPPER$ will check 
any specified string passed by the calling 
source, and convert all small letters to 
capital letters. A FOR-ENDFOR loop 
checks the Ascii code of each character of 
the string in turn and if it is that of a small 
letter, subtracts 32 from the code to con- 
vert itinto the corresponding capital letter, 
using the CHR$ function. The function 
LOWER$ converts upper case letters into 
lower case in the same way by adding 32 
to the Ascii code when it encounters a 
capital letter in the string (listing twenty- 
six). ; 

To put these functions into use the 
fieldname structure of the database has 
been modified and changes are needed in 
the existing procedures for entering and 
amending records. A$ (0) has been 
changed to incorporate a flag in each 
fieldname which is used when entering 
data to indicate which of the defined func- 
tions is to be called. The flags are C 
(character), N (number) and D (date) and 
are inserted as the third character in each 
field of a$(0). 
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(The first and second character places 
are reserved for the | flag and the value of 
active respectively.) The fieldname proper 
now begins with the fourth character in 
a$(0) and, allowing 8 characters for the 
name, requires a minimum value of 11 for 
chars. CReate has been altered as follows 
to enable the flag to be input after each 
fieldname (listing twenty seven). 

Several new lines have been added to 
procedures EN and AM, calling the appro- 
priate function according to the flag for 
each field in turn. 

ENter is modified as in listing twenty 
eight. If the ENTER key is pressed as an 
entry, a default value of 0 is entered for a 
number field or 000000 for a date field. 

AMend is changed similarly (listing 
twenty nine) but default values are not 
given as ENTER alone here means ‘leave 
unchanged’. 


Listing twenty-eight 


1220 PRINT(a$(0,fld,4 TO LEN(a$(0,fld))));TO 
1220a$(0,fld,3)%" 2 "3 

1221 IF a$(0,fld,3)="N" THEN 

1222 ag=intake$:IF q$="" THEN q$="0" 

1223 ELSE 

1224 IF a$(0,fld,3)="D" THEN 

1225 q¢=checkdate$: IF q$="" THEN q$="000000" 
1226 ELSE 

1227 INPUT q$ 

1228 END IF :END IF 

1230 IF q$="©" THEN EXIT entryloop 


Listing twenty-nine 


1860 PRINT a$(0,fld,4 TO LEN(a$(0,fld)));TO 
ll;a¢$(0,fld,3)3;": "&ag(c,fld):PRINT TO 11 
1861 IF a$(0,fld,3)="N" THEN 

1862 qt=intake$ 

1863 ELSE 

1864 IF a$(0,fld,3)="D" THEN 

1865 q¢=checkdate$ 

1866 ELSE 

1867 INPUT q$ 

1868 END IF :END IF 

1870 IF q$="" THEN :hold$(fld)=a$(c,fld):ELSE: 
hold$(fld)=q$: reenter=reenter +(a$(0,fld,1)="I"): 
END IF 


Next month 


Itis also necessary to change each refer- 
ence to ‘a$(0,3 to..’ to ‘a$(0,4 to..’. These 
occur in lines 2076, 2077, 2083, 2086, 
2266, 4070, 4150, 4380 and 4980. 

Next month we shall convert DBQL from 
a flat file to a fully relational database by 
adding facilities to have more than one file 
open at the same time. 
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iS FTWARE FILE 


TRANSFER UTILITY 


Brian Davies tries on a no-frills conversion file for disk 


INFORMATION 


Program: Transfer Utility 
Price: £9.95 (plus 5/10% for 
overseas buyers). 

Supplier: 

Digital Precision Ltd., 

22? The Avenue, 
Chingford, London E4 9SE. 
Tel. (081) - 527 - 5493. 


he microdrive 

cartridge is still far 

from dead, but many 

users turn to disk 
drives at some stage during 
their life with the OL. If you 
have a program such as The 
Editar, it is not too difficult to 
alter existing microdrive 
program files to make the 
programsrun from floppy disk, 
by using the search-and- 
replace function to replace all 
instances or ‘mdv by ‘flp’. For 
users who do not have a 
suitable editor, or who do not 
feel competent to performsuch 
operations, various conversion 


and microdrive. 


programs have been sold in 
the past, but they may not be 
easily obtainable now. 


Facilities 


Transfer Utility isa fairly new 
program, supplied by the 
largest OL software house, and 
priced very reasonably. It is 
not a simplE mdv-to-flp con- 
verter, and provides extra fa- 
cilities which will make it of 
general interest. In fact, as the 
name suggests, the basic pur- 
pose of the program ts to 
transfer files fromone medium 
to another, but Digital Preci- 
sion clearly feel that the pro- 
gram will appeal particularly 
to microdrive users who are 
converting to disk as the pro- 
gram is supplied only on disk. 


SPECIFY DEVICE 10 COPY FROM (default mdb: - — 
EPECIFY DEVICE TO COPY TO (default fp!) ; 
SPECIFY DEVICE 10 USE A6 A TEMPORARY STORE (default flpt_): fp : 


Ensure that the source medium is in mdvi.. 


reure that the destination medium is 


in Fpl 


Ho medium should be orite-protected, 
SHOULD fipi_ BE FORMATTED? C//H)H 


SPECIFY TRAHSLATE FROH 


SPECIFY TRANSLATE 10 


SPECIFY TR HSLATE FRO if. 


SPECIFY TRAHSLATE 10 


SPEC IFY TRANSLATE FROM: 


nd 


By Digital Precision stand- 

ards, the instruction manual 
is minuscule - three sides of 
text. [tis supplied in both pa- 
per and disk file form, and is 
very easy to read and under- 
stand. The program itself is 
straightforward to use. It is 
only when one gets ambitious, 
and makes use of the extra 
facilities, that serious thinking 
is desirable. The two obvious 
features are the facility to 
perform search-and-replace 
operations on any strings, and 
the ability to copy all files, not 
just those which existing 
commands such as WCOPY 
will recognise. 

The last point needs clarify- 
ing. Some users will believe 
thatWCOPY cancopy any file 
from one medium to another, 


SHOULD THE HATCHES: EE EXACT: £1 cbe=a80 /SEMI-EARCT (aBc=ABC) /IMEMACT Cobc=fbC 


E/S/1)8 


Transfer boot? 


CAVA) 


The screen: waiting selection for transfer. 
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but this is not true. This com- 
mand is ‘blind’ to certain file 
names and will ignore files 
which have them. The same is 
true of copying functions with 
some other programs, such as 
Files H (part of Taskmaster). 


WCOPY 


The point should not be over- 
emphasised, since many users 
would not need to make copies 
of files with unusual names, 
butitis worth giving examples 
of what Transfer Utility can 
copy that WCOPY and the Files 
Il Backup command can't 
handle. Three copies of a test 
disk apparently produced 11, 
nine and three files respec- 
tively, using the three pro- 
grams /commands mentioned, 
The test disk appeared to have 
10 files on it when checked with 
the DIR command from 
SuperBasic; the space taken on 
the test disk was 474 sectors. 
The copy produced by Trans- 
fer Utility appeared to match 
the original, in all respects. The 
disk produced by WCOPY 
apparently held only two files 
when checked from 
SuperBasic, taking six sectors. 
In addition, one of the files 
initially copied was 
overwritten later, and it was 
necessary to repeatedly press 
the A key to persuade the 
command to continue with 
(unsuccessful) attempts tocopy 
several more files. In short, 
WCOPY seemed baffled by the 
test disk. 

Files II displayed only three 
files during copying, and three 
files during copying, and three 
were shown when the 
SuperBasic DUR command was 
used, the space taken being 
nine sectors. Of the files on the 
test disk, wight had names 


Sinclair/QL World August 1991 


——aoOoOowWVWVKxK._eaaEeE...——eaSSa.a LS —<—<“—_ 


TRANSFER UTILITY 


which contain a ‘splodge’ 
character, and one had no dis- 
played name. As noted above, 
the blind spots of other copy 
routines may not be of conse- 
quence to many users, but there 
are quite a few commercial 
program disks which contain 
files with unusual names (often 
as part of a copy-protection 
effort) which would not be 
copiable in the usual fashion 
(and the programs might, 
therefore, not run from the 
copies). The program on the 
test disk did not run when 
copied by WCOPY and Files II. 


Protected 


It has to be made clear that 
Transfer Utility is notintended 
to bea means of copying copy- 
protected programs; for in- 
stance, identical copies will not 
be made of programs which 
are protected by the require- 
ment for a master disk to be in 
a particular drive, nor of pro- 
grams which have the device 
names identified by non-con- 
secutive characters within 
program files. An attempt to 
copy the cartridges from the 
old Quest program Cash Trader 
was unsuccessful, forexample, 
as the program would not run. 
Specificexamples of files which 
can be handled are those of 
zero length, or with zero-length 
file names, and those with file 
names containing null charac- 
ters. 

With a small number of files, 
copying speed may be of little 
consequence, but it is worth 
recording that Transfer Utility 
was considerably faster in the 
test described that WCOPY, 
and this might be a useful fac- 
tor when copying large num- 
bers of files and media. 


Strings 


The string-conversion func- 
tion permits up to 32 substitu- 
tions to be made during the 
transfer process. Each substi- 
tution can involve up to 64 
characters in the strings con- 
cerned, but the replacement 
must be of the same length as 
the original strings. The sub- 
stitutions are done in succes- 
sion; thatis, aftera file has been 
processed for one, it is then 
processed again from the start 
if a second (or subsequent) 
substitution has been specified. 
Thespecified substitutions and 


SPECIFY TRANSLATE FROM 


SHOULO THE HATCHES BE EAACT (abe=abe) /5 SEI-E¥RCT Bc) NENA B60)? 


(E/S/1)5 


Tramefer boot? (1/4/0703 A 


Copying boot of length 62 with 2 
3004 with 6 ttl) transi 


Copying _ of length 3 


(e24i). trap ¢ gins 
tes 


Copying ident of length S with @ translates 
Copying wenu of length 14744 with 9 (742) translates 


Copying security of length 40344 with 21 (1248) tranelates 
Copying create of tert {9552 with 2i (1348) translates 

Copying group.cum of Jength 265 with @ trorelates 

Copying analysis evn of length 2807 with @ translates. 
Copying valfile ex of le 363 with @ t 
Copying clone of length 1964 with _ & HD) t 
Copying of length 12184: with 8 


11 files total Ling 96691 baie iene fete iri 785 
with 22 ae translates. 


FINISHED. 5 VJ 


PHOTHER TRANSFER? ¢ 


a a ey 
The screen: transfer process now completed. 


strings are applied to all of the 
files on the disk. Talking in 
terms of device names may 
obscure the fact that it is pos- 
sible to make replacement of 
text strings which are nothing 
to do with such matters, For 
instance, you might havea long 
text file in which the word 
‘close’ needed to be replaced 
by ‘exact’, and this can be done 
during the copy process. 


The supplied disk contains 
three files of extension, loaded 
through the RESPR command, 
making it desirable to boot the 
program after a reset. Replac- 
ing the RESPR by the ALCHP 
command (from a Toolkit) in 
the boot should make it possi- 
ble to run the program after 
other programs. For those us- 
ers who feel they can’t do quite 
what they want with the pro- 
gram as it is supplied, the 
SuperBasic source code is 
provided on the disk, and can 
be modified as desired (but not 
sold). A Turbo-complied ver- 
sion of the programis run from 
the boot file. Not surprisingly 
to use the program itself to 
make a backup copy of it. 

The screen presentation dur- 
ing use is simple, and easily 
understood. The source and 
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target devices have to be speci- 
fied (default are mdvl_ and 
flp_ respectively), as does the 
device to be used for tempo- 
rary storage. If a ramdisk is 
used, you are asked if the disk 
interface in the system is of the 
MCS type, as the program 
needs to know this information 
because the MCS interface has 
a non-standard way of dealing 
with ramdisks, Changes to the 
specified devices are retained 
for when the program is next 
run. The option to format the 
target medium is given. 

The ‘from’ and ‘to’ strings for 
each conversion are then 
specified the ENTER key alone 
being pressed if no conversion 
are required. To avoid awk- 
wardness where both upper- 
and lower-case characters are 
involved onconversion strings, 
there is a choice of three 
methods of dealing with case - 
‘exact’ being of the form 
aBc=aBc, ‘semi-exact’ being 
aBc=ABC, and ‘inexact’ being 
aBc=AbC. Once conversion 
commences, the file names, 
sizes and number of conver- 
sion made in each file are 
shown on thescreen. The usual 
Y/N/A/O choice is offered 
before copying takes place. 

Figure two shows the screen 
at the point where the program 
is awaiting the user’s selection 


for transfer of the (first) file 
‘boot’. The total space taken by 
the copied files is shown upon 
completion, along with the time 
taken and the total number of 
string conversions. The option 
is then offered of going ahead 
with another transfer opera- 
tion. Figure one shows the 
screen when the transfer proc- 
ess has been completed; the 
program is offering the option 
to do another transfer opera- 
tion. 


Unseen 


This is a no-frills program, 
which does the job quickly, 
without placing heavy de- 
mands upon the user’s com- 
puter knowledge. It is not the 
kind of thing one would need 
every day, but it is cheap 
enough to buy for occasional 
use. For users converting sev- 
eral programs from cartridge 
to disk, the price may be low 
enough to be justified for only 
the one session. The ability to 
‘see’ files which are unseen by 
other copy commands could 
be of considerable use to the 
more technical user. It is good 
to see Digital Precision intro- 
ducing more low-cost utilities, 
as there has been a dearth of 
such things since PDQL disap- 
peared from view. 


INFORMATION 
Program: Discopy 2.06 
Price: £7.50 
Supplier: Ofile 
Apartado 2110 
P-1103.Lisboa 
Codex 
Portugal 


rograms don't come 
much cheaper than this 
one, It is, perhaps, in 


the mould of those 
PDQL used to sell, in that itis a 
single-function program which 
could be useful to users who 
do not have (maybe can't af- 
ford) any of the file utilities 
which incorporate several 
functions. As its name implies, 
Discopy is a program for copy- 
ing disks. If it made only 
straight copies of files on Qdos- 
format disks, there wouldseem 
to be little point in having it, 
but there is more to it than that. 
The supplier of Discopy - Ofile 
—also sells MS-QLink, which is 
asimilar program, but hasmore 
functions, 


Fixed 


That program was reviewed 
last year, and the conclusion 
was that it had good features 
but suffered from some prob- 
lems, these subsequently be- 
ing fixed to give an unusual, 
and useful, utility. A common 
feature of the two programs is 
the ability to handle disks of 
other formats besides Qdos. 
Specifically, Discopy handles 
‘any QL, MS-DOS and Atari 
TOS disk (720K, 360K, single- 
or double-sided). The majority 
of QL users presumably have 
just the one computer, but a 
sizeable minority are in 'multi- 
computer families', and the 
Atari and (IBM-type) PC seem 
to be the usual other machines. 

The program will run in the 
background, and uses ram to 
reduce the amount of disk- 
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DISCOPY 


From the makers of MS-Qlink, this new disk copying 
utility works well and is more versatile than simple 
COPY or WCOPY, as Bryan Davies finds out. 


coos off 7 memory = D678 


xtra definition of DIR zapped, 
xtra definition of EXEC zapped, 
tea dofinition nf EVEC Hammad 


¥ 


AN Scud Ue WTCLtUn UY Nu clea 

An extra definition of CLEAR zapped, 

An-extra-definition of OPEN_IN zapped, 

An extra definition of OPEN NEW zapped, 

An-extre-definition-of CALL zapped, 
xtra definition of CONTINUE zapped, 
xtra definition of RETRY zapped, 

An extra definition of PROGUSE- zapped, 


We have finished, 


swapping required. It can be willbemoreswappingofdisks are not suitable for use with 
used with either single ordual if memory is limited. Disk in- Discopy (or with various other 
disk drives. Amemory expan-__ terfaces which do not permit programs); the user is advised 
sionisnotnecessary,butthere direct disk sector addressing to purchase updated eprom 
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chips for MicroPeripherals or 
Medic interfaces. The program 
was written in SuperBasic and 
compiled with Turbo. 

Many users will be familiar 
with (and annoyed by) the col- 
lection of additional com- 
mands, which accumulate in 
the QL as additional applica- 
tion programs are loaded. 
When these extension com- 
mands are listed, some of them 
may appear several times. This 
can cause problems; at the least, 
space is wasted. It would be 
nice to have some sort of fil- 
tering process, which would 
get rid of duplicate commands. 
Discopy has such a function 
(as does MS-QLink), and its 
action can be seen in the illus- 
tration, partially obscured by 
the main menu. 


Two parts 


The program boot is in two 
parts, the second one being 
called only if the first decides 
that the particular QL being 
used has the AH or JM Qdos 
version. When the second boot 
runs, it calls a task that looks 
through the commands and 
‘zaps' duplicates. Ascanbeseen 
on the illustration, this can get 
rid of quite a lot of unwanted 
items (apparently, nearly 10 KB 
of them from my system). The 
screen dump shows only the 
one ‘page’ and there were a 
similar number of commands 
on the previous page, making 
of the order of forty that were 
removed, 

Discopy itself uses a run-time 
version of Digital Precision's 
Xtras file, which is similar to 
the Turbo_TK_Code file that is 
automatically loaded by the 
boot routine on my system. The 
Discopy instructions point out 
that the supplied boot can be 
modified to remove the line 
which loads the extensions, if 
the user already has sucha line 
in an existing system boot; 
starting via thesecond boot file, 
instead of the first, by-passes 
the loading of extensions. 
Discopy itself can be started 
with EXEC or EXEC _W and 
will run alongside other com- 
mon programs without con- 
flict. About 20 KB of memory is 
used by the program when 
loaded, and a further small 
amount is taken during copy 
operations. 

Instructions are provided in 
a small, well-printed booklet. 


Adequate information is given 
to meet the needs of most us- 
ers. The single menu is fairly 
self-explanatory. Source and 
target drives can be toggled in 
the range flp1-4, the number of 
disk sides can be toggled be- 
tween | and 2, and the number 
of tracks can be set to 40 or 80, 
or anywhere in the range 1-85 
if the + key is used. F4 redraws 
the menu display, ESC will take 
you out of the program, or back 
to the menu after (some) mes- 
sages are displayed. 

The Format option is initially 
not active; that is, it is in green 
onthe menu, as opposed to the 
black of the other options. To 
have the target disk formatted 
before a copy is made, you 
press F, which turns the colour 
of Format on the menu to black. 
This is out-of-line with the 
manner of selecting the other 
options, as you would expect 
to have to press F for the for- 
mat to be done, rather than 
simply to make it possible to 
do a format after a further 
keypress. In practice, selecting 
C to make a copy then causes 
the target disk to be formatted, 
but no copy is made; you have 
to select C again to get a copy. 

The behaviour of the program 
after Format was selected was 
rather baffling, in fact. Having 
obtained a format by selecting 
Formatand then Copy, a check 
was made of what was on the 
target disk, by stepping-out to 
SuperBasic and doing a DIR. 
Onusing F4 torefresh the menu 
after going back into Discopy, 
the Copy process started, 
without the display being re- 
freshed. It appeared that any 
other key (including ESC) 
would start the Copy process, 
also, The menu routines need 
correcting in this area, but the 
standard format and copy op- 
erations were performed suc- 
cessfully. 


Format 


The 'Trks' options relates only 
to copying; you cannot change 
the format mode, which is al- 
ways the standard 80-track one. 
You can, however, format disks 
1- or 2-sided. This operation 
wasn't very successful on my 
system; although a message 
indicated a 720-sector format 
was completed, after 'l-sided' 
had been selected, and the 
Copy process went ahead, the 
result on several occasions was 
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a target disk that caused the 
system to lock up when a DIR 
was done. In case particular 
features of my loaded software 
were causing problems for 
Discopy, the latter was booted 
from a ‘clean’ machine, but the 
message ‘disk. . . in use’ ap- 
peared each time a Copy was 
requested, and it wasn't possi- 
ble to proceed with any op- 
eration. 

There may be some conflict 
here relating to the JM rom, 
although the program appears 
to detect that, since it goes 
ahead with the task of deleting 
surplus copies of extension 
commands. Typing individual 
boot lines inseparately enabled 
the program to start, and work 
normally. 


Report 


The Report option may be a 
bit too technical for some users 
to understand. It is normally 
switched-on, by default, and 
the progress of a Copy opera- 
tion is shown on the menu by 
Track counters for source and 
target disks. The ‘Tracks’ figure 
forthe source disk will be larger 
than that for the target (until a 
copy is completed), and de- 
pends upon the amount of ram 
available tothe program. From 
20 to 80 tracks were read before 
writing started in the tests. 
While the Report function is 
on, the program does not at- 
tempt to re-read or re-write 
from/to disks when there is an 
error. That is, the copy opera- 
tions stops if an error occurs. 

If Report is switched off, as is 
suggested for when a copy is 
doneasa background job while 
the user gets on with some- 
thing else, there is no report of 
the progress of the copy, and 
the program makes up to four 
attempts to read/write infor- 
mation when an error occurs. 
You are also advised to switch 
Report off when using QJump's 
Ptr_Gen file, as Discopy will 
otherwise lock up when run as 
a background job with the 
pointer interface. 

There is a configuration rou- 
tine which can be used to alter 
the default settings. The empty 
area at the bottom of the menu 
box is used to display program 
messages, such as requesting 
confirmation that a format 
should bedone. Oncompletion 
of one Copy, you can immedi- 
ately do another with the same 
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source disk. If the source disk 
has a volume label, the target 
disk is given the same label, 
which could lead to confusion 
later on. As an aid to ‘normal 
users’, the numbering of tracks 
and sides is altered by the 
program. That is, instead of 
being presented with numbers 
that don't seem too sensible to 
the average person, you get 1 
to 80 for tracks and 1 to 2 for 
sides (the usual is 0-79 and 0- 
1). As sector numbering is 
‘normal’, it is possible to test 
the program's ability to copy 
them, but it worked satisfacto- 
rily on several Qdos disks, and 
with three MS-DOS disks. 
There was some problem with 
two other MS-DOS disks used 
for test, but, after they had been 
subjected to a ‘revive’ opera- 
tion on the PC, they were cop- 
ied alright by Discopy, sug- 
gesting that there had been 
(previously-undetected) errors 
on these disks. It was quite in- 
teresting to have errors on 
‘foreign’ disks pointed out in 
this fashion. The TOS format is 
similar to the MS-DOS, and 
there is no reason to think the 
program cannot handle it as 
well. 


Quirks 


Apart from the quirks men- 
tioned, the program worked 
properly. The current version 
is 2.07, but the only reported 
change in that from the review 
version was made to correct a 
problem occurring only with 
the Atari ST QL emulator. It 
might not be obvious to some 
people that what the program 
is doing is not simply copying 
files from one disk to another — 
which can be done with the 
COPY or WCOPY commands 
—but producing a ‘replica’ disk, 
with the data located in the 
same place as on the original. 
For example, copying the 
working MS-DOS program 
disk supplied with the Con- 
queror PC emulator produces a 
disk that can be used for boot- 
ing MS-DOS; if the DOS Copy 
command were used instead, 
the resulting disk would con- 
tain all the files but they would 
not be correctly located on the 
disk to allow it to be used for 
booting. This function can be 
handy, and is normally avail- 
able only as just one part of 
utility programs which cost 
more than Discopy. 
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INFORMATION 


Program: QL, Bargain Software 
Pack: Inkwell Deluxe, Inktyper, 
Cue-well 2 and 20 extra fonts. 


Supplier: Rob-Roy Software, 94 
Teignmouth Road, Clevedon, 
Bristol, BS21 6DR. 


Price: £10.00 for 3'/2 or 5! /sin 
disk. Send two mdvs with or- 
der for micro-cassette copy. 


ow here is a bundle 

of software well 

worthevery penny of 

the ten pounds 
asked. 

Tam sure that most readers in 
the past will have spent far 
more on the purchase of pro- 
grams than this, only to find 
themselves bitterly disap- 
pointed when they start to use 
them, With this software, I as- 
sure you that you won't. 
| This package contains Inkwell 

Deluxe and Inktyper, a com- 
bined program which gives 
you access to literally hundreds 
of print styles for instant use 
on your printer. In addition 
there are Cuewell 1 and 2, two 
front end programs which act 
as disk and mdv management 
systems. 

Inkwell Deluxe is a combined 
font editor and print utility. 
Thirty complete fonts are pro- 
vided, each of which can be 
manipulated to individual re- 
quirements. They can be 
shadowed, rotated, flipped, 
outlined, italicised, embold- 
ened and shrunk, in normal or 
italic print. 

You can print documents 
using any of the fonts, with 
control over line spacing, print 
emphasis, character spacing, 
character width/height and 
print density. 

It works with all Epson com- 
patible dot matrix printers (and 
to a limited degree with the 
Serial 8056). It will work with 
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QL BARGAIN 
SOFTWARE PACK 


John Shaw tries 'the bargain of the 
year so far' for the unexpanded QL. 


any standard text editor which 
can produce Ascii files, in- 
cluding of course Quill. 

Let us say, for example, that 
you have a Quill doc which 
you would like to have printed 


in different fonts with varying 
sizes. All you dois to make the 
firstline ofthe docas follows: 
HH 


Then enter control codes for 


the different fonts on the _doc: 
(W3H2U2L0C2} 


Translated, this means: Width 
3, height 2, using-font 2, line 
spacing 0, character- spacing 2. 

Note that curly brackets are 
used { } to enter the codes. 

Then you change the fonts, 
etc. as you progress through 
the doce and you finally finish 
with: 


(HH 


When you have saved it, you 
thenrun it through the Inkwell 
program and it gets printed as 
you have planned it. There is a 
previewing facility to make 
sure you like the layout. 

The Inktyper part of the pro- 
gram isa natural development 
of Inkwell Deluxe. 

This now allows your QL to 
be used as a very versatile 
electric typewriter. In a flash 
you can be printing direct to 
your printer from the QL key- 
board using any chosen font. 

The display in front of you 
emulates a normal typewriter 
including such things as mar- 
gin settings. As you type you 
stillkeepa view ofthe previous 
six lines of print. In addition, 
by pressing Fl you can see a 
representation of the style of 
print and actual line length 
before it goes on paper. 

Thereis draft mode fora quick 
run through tocheckallis well. 
Then there is the nlq mode 
whereby all the printstyles and 
other features you have put in 
are activated. 

A comprehensive manual is 
supplied to help with any 
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unusual printer codes which 
may be needed. 

Cuewell and Cueiwell 2 are two 
friendly front-end systems so 
designed as to make all your 
flp and mdv housekeeping 
operations as simple and easy 
as possible using a minimum 
of keystrokes. Cuewell is the 
simpler version which has been 
updated by Cuewell 2. The full 
blown Cuewell 2 shows an al- 
phabetically sorted directory 
ofup to 156 files, with filesizes. 

You can Copy, Load, Format, 
Rename and Delete files witha 
single key press. In addition, 
Cuewell 2 allows you to store 


information about each file and 
add notes, which will save you 
loading the doe or any other 
files, to see what they contain. 

Possibly the greatest benefit 
is that it sits in high memory, 
so that even if you type NEW it 
still remains usable. 

The whole directory of a disk 
or mdy canbe printed with one 
key press, so you can print out 
details of your whole disk li- 
brary in minutes, what a facil- 
ity! 

Any of these programs is 
worth the £10.00 asking price. 
For four, it has to be the soft- 
ware bargain of the year so far. 


Qtris 


DATA ‘SYSTEMS. 


A SUPERB RENDITION OF THE ALL TIME 
FAVOURITE GAME NOW ON THE QL 


@ One or two player option (simuitaneous play). 
@ Smooth, fast and colourful graphics. 

@ 100% hand crafted machine code. 

@ All the features of the original and MORE. 


@ A32 by 32 inch drawing area. 


colour assignments. 


Please make cheques payable to Lear Data Systems and send to: 


6 SOUTH VIEW GREEN, BENTLEY, 


ce |PSWICH, 


@ Resolution down to .001 of aninch. 
@ Up to 16 separate layers with variable 


@ 16 predefined Pad shapes and sizes. 

@ G4 Track widths from .005 to .32 of an inch. 
@ The number of components on a pe ye is limited hy memory only. 
@ Auto repeat on all elements ~ idea 

@ Can be used for surface mounted devices. 

@ Auto via system for multilayer boards. 

@ Over 32,000 user definable library components. 

@ Can output plot files to any valid QLUTHOR device. 

@ Produces Dot matrix, HP-GL or Postscript laser files. 

@ Supports Trump card and ABC Etectronik keyboard interface. 


Minimum system requirements: 512K expansion and 1 disc drive. 


THE STANDARD PCB 
DESIGN SYSTEM FOR 
THE QL 


for memory planes. 


SUFFOLK IP9 2DR. 


TELEPHONE: (0473) 310804 
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INFORMATION 


Program: Screen Economiser. 


Supplier: Dilwyn Jones Com- 


puting, 41 Bre Emrys, 
Tal-y-Bont, Bangor, Gwynedd. 


Price: £10.00. Available on 
Mdvy, 3!'/2 or 5'/sin disk for 
the unexpanded QL. 


id you know that if 

you left the display 

fixed on your screen 

then after a while it 

will burn the phosphor coat- 
ing? I didn’t. I think of the 
number of times I have left a 
Quill doc on my screen for 
hours having answered the 
door to an unexpected visitor. 
Now help is at hand. Gerard 


SUREEN ECONOMISER 


No burn-outs with a user-friendly 
screen timeout profram. 


QUANTA 


Estournet has produced a 
handy little routine which you 
load as a BOOT file for your 
program, and if the screen 
doesn’t change its display fora 
preset period of minutes, it 
shuts down the screen display. 
It doesn’t switch off the QL. 

To recover your screen you 
just touch the <space> bar and 
as if by magic it reappears 
again. 

You decide how long a delay 
you would like to have (the 
default is 10 minutes) and set it 
in the BOOT by inserting the 
word SECOVAL followed bya 
number between 1] and 255, as 
in SECOVAL 15, The number 
inserted represents minutes, 

This isasimple program, eas- 
ily set into motionand valuable 
to those people who are in- 
clined to fall asleep in the 
middle of a late night session! 


bndiepended QL/Thor Users Group 


Worldwide Membership is by subscription 
only, and offers the following benefits: 
Monthly Newsletter — up to 40 pages 

Massive Software Library — mostly FREE! 
Free Helpline and Workshops 
Regional Sub-Groups. One near you? 

Advice on Software & Hardware problems 
Discounts from most major suppliers 
Subscription just £14 for UK members 

Overseas subscription £17 


Barclaycard: Visa: Access:* Mastercard 
* Now in our EIGHTH successful year * 
Further details from the Membership Secretary 
Bill Newell 
213 Manor Road 
Benfleet 


Essex. SS7 4JD 
Tel (0268) 754 407 


SUBSCRIBE TO 


AND GET THIS 


sia 


.- ABSOL a ia 


Fill in the coupon below and send it with your remitiance fo: WRSAd. iy 
Subscriptions Department, Lazahold Lid, PO: Box 10, Roper Street)’ Palllion 
Industrial Estate, Sunderland SR4 6SN. Telephone 091510 2290. 


(The first issue of a new subscription to be delivered will be one or two issues after the one you placed your order in.) 


Please start/renew my 12/24 month subscription to SINCLAIR QL WORLD and send my. free binder. a 
I] enclose my cheque/money order for £ made payable to MCPC Ltd or debit my Access/Visa card. | 
INo Expiry date | 
Name Address | 

| 


| (Please enter postcode to ensure prompt delivery) 


| | 
I Signed Date SQL 0891 | 
L. 


